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1. Document Overview 


This document describes the Advanced Imaging System CCD 
based camera. The AIS1 camera system was devoloped at 
Photometries Ltd. in Tucson, Arizona as part of a Phase 2 SBIR 
contract No. NAS5-30171 from the NASA/Goddard Spaceflight Center 
in Greenbelt, Maryland. The camera project was undertaken as a part 
of the Space Telescope Imaging Spectrograph (STIS) project. 

This document is intended to serve as a complete manual for 
the use and maintenance of the camera system. All the different 
parts of the camera hardware and software are discussed and 
complete schematics and source code listings are provided. 
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2. System Overview 


The Advanced Imaging System (AIS) is a slow scan, high 
precision CCD imaging system designed specifically for low noise 
image acquisition and precise, highly flexible CCD testing and 
characterization. In addition, the system is designed to allow CCD 
mosaics to be supported with separate, programmable clock voltages 
and output amplifier operating points for each device. 

2.1 Introduction 

The development of new CCD technology has been proceeding 
at a rapid rate in recent years. Large format devices of 2K x 2K and 
4K x 4K resolution with multiple low readout noise amplifiers, 
flexible operating modes (such as MPP inverted operation and 
clocked recombination anti-blooming) are now available with even 
more new devices in development. New output amplifier 
architectures such as the non-destructive readout floating gate 
"skipper" amplifiers have proven feasible. Butted arrays of multiple 
large format devices are now being developed at several institutions. 
These innovations have rendered current CCD cameras obsolete and 
developed a demand for a new generation camera system that will 
capitalize on the advances in CCD technology. 

The Advanced Imaging System (AIS) was developed to support 
all known large format CCD arrays and mosaics under development, 
and allow provision to future expansion. Several goals were 
identified for the system including: 

1. The system should be sufficiently flexible to 
operate virtually any CCD imager, and multiple 
output CCDs and CCD mosaics, so the user could 
change CCDs with minimal hardware modifications. 

2. The system signal/noise should be limited either by 
the characteristics of the CCD or photon shot noise 
and the digitization performed to the highest 
accuracy available with current analog to digital 
converter technology. 

3. The clock voltages, timing, and other system 
parameters should be alterable through software in 
order to optimize CCD performance for a given set 
of experimental conditions. 
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4. The image acquisition computer system should be 
capable of accommodating images of multi- 
megabyte size. 

5. The camera head should be able to be separated 
from the host computer by long distances. 

In response to the rapidly changing technologies and 
techniques associated with scientific CCD imaging, system flexibility, 
programmability, and adaptability have been emphasized. 

Flexibility is a crucial feature of imaging systems which are 
intended for use into the next century. CCD imaging systems designed 
today need to be flexible enough to operate a variety of CCD devices 
in a wide variety of operating modes. Sufficient clock signals must be 
provided to operate different CCD architectures. Operating point 
voltages need to be controllable over a wide enough range to support 
different types of output amplifier structures. 

Systems which are intended to be useful over the long term 
must be flexible enough to deliver virtually any desired waveforms 
to the image sensor clock inputs, and must be ready to measure the 
data thus produced as quickly and accurately as possible. Modularity 
of system hardware allows for integration of new technologies as 
they become available without complete reconfiguration of the 
system. This is especially important in the areas of analog processing, 
clock sequence generation, and analog to digital conversion. 

Programmability implies the ability of the system's operation 
to be controlled not only through built-in commands, but through the 
creation of new commands and command sequences which may be 
referred to indirectly. By eliminating overhead in the command 
interface, and by reducing the amount of time spent transmitting 
commands and the chance of communication corruption caused by 
outside noise sources. 

Programmability allows a system to be more efficiently used in 
the collection of data. This reduces the amount of time spent 
transmitting commands and the chance of communication corruption 
caused by outside noise sources. It also aids in the elimination of 
redundant initialization tasks. 

An adaptable system is able to be permanently or semi- 
permanently modified to better meet the requirements of the 
experiment in progress. A CCD imaging system, in order to be 
considered adaptable, must be capable of "remembering" user 
defined commands, CCD clock and operating point voltages, and 
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desired timing sequences.. Use of an EEPROM memory, which may be 
programmed in-circuit, allows the system state to be stored at any 
time. Default parameters and command sequences may be retained 
from session to session, and may be modified at any time by the 
user. 

2.2 System Hardware 

The system was designed in such a way as to allow the cost of 
the system, at least to some extent, to be scaled with the flexibility 
required by the end user, without sacrificing performance. Modular 
construction allows a particular system configuration to be 
established for each application, without eliminating any of the more 
advanced features of the system. Single port camera systems are 
supported with a set of five printed circuit boards. Additional ports 
on the same device may be supported by the addition of one more 
board per port. Additional ports on other devices requires one board 
to support the clock voltages required for the additional CCD and one 
board for each CCD output port used. The system software supports 
up to eight CCD devices and an unlimited number of output ports. 

The amount of hardware required for the AIS1 camera system 
depends on the application, and system configuration. The minimum 
requirement is as follows: 

1 System Controller, performing system control tasks 
such as communication with the host computer/user, 

CCD temperature measurement and control, and 
shutter control. 

1 DSP Sequencer, generates the CCD clock voltages and 
timing waveforms. 

1 Clock Generator, containing the programmable CCD 
voltage references, and switching circuitry,. 

1 Analog Processor, containing signal processing chains, 
and CCD clock buffers. 

1 CCD socket card and preamplifier, located in the 
cryostat. 

Multiple ports on the CCD may be operated by adding one 
analog processor for each additional output port desired. If different 
clock or CCD output FET operating voltages are desired for the 
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different ports, or if additional CCD imagers are added, additional 
clock generator cards are required. 

2.3 STIS AIS1 Camera Configuration 

This specific camera system, the STIS camera system consists 
of the following hardware: 

1 Camera controller, comprised of three circuit boards. 

There is a controller board, a sequencer board, and a 
temperature and shutter control board. Each of these is 
described in more detail below. 

2 Clock generators, one for each of the two ports being 
used on the CCD in this system. Duplication of the clock 
generators allows maximum optimization of the 
operating points of the two output amplifiers. 

2 Analog processors, each a 16 bit Dual slope integrator 
operating at pixel rates of 50 kHz and below. 

1 Filter board, located in the cryostat. The filter board is 
used to filter the DC voltages being applied to the CCD 
as well as serving as the location of the reset and 
summing well switches. 

1 Socket card holding the CCD and the first stage 
preamplifier circuitry. 

1 Tektronix M745A CCD. 
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3. Controller Module 


3.1 Controller Module Overview 

The AIS1 controller module contains the digital electronics that 
communicate with the host computer, in this case the Sun 
workstation, and control the CCD and analog processor to read the 
data off the imager. The controller module also contains the circuitry 
that is used to measure and control the temperature of the CCD and 
the circuitry required to drive the shutter solenoid. 

There are five circuit cards inside the module. Three of these 
cards are the embedded controller electronics consisting of 
microprocessor based "controller" and "sequencer" cards, and a 
"temperature/shutter control" card. These cards are connected to one 
another via a simple "motherboard" and the connectors on the 
module's chassis are connected to them through a "fiber optic 
interface" card. 

The camera controller module is normally bolted to the side of 
the camera head. The controller module may be remotely located 
from the camera head if that is necessary. This requires the use of 
some longer cables to connect it to the Clock/Analog Modules and the 
camera head. 

Below, the camera control module's external connectors are 
described, and the boards are then examined individually. Complete 
schematics and programmable logic device equation listings are 
provided for each of the boards. 

3.2 Connectors and Pinouts 

There are several connectors on the camera controller module. 
These are used either to connect the module to the host computer or 
to connect the controller module to the clock/analog modules. The 
connectors will be discussed below. 

The Connector labeled "Camera Control Source" connects to the 
clock/analog modules. It carries the signals from the DSP sequencer 
which control the clock and analog cards. These signals are generated 
by the DSP at a maximum rate of 10 MHz. They are differentially 
driven on the cable, but over limited distance. The data sheets for 
the drivers use indicate that these signals could be driven as far as 
100 meters.We have successfully tested 25 meters but have not tried 
longer distances. 
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Camera Control Source Connector Pinout : DB37M 


pin 

function 

pin 

function 

pin 

function 

1 

WR+ 

17 

D0+ 

33 

unused 

2 

WR- 

18 

D0- 

34 

unused 

3 

A0+ 

19 

D1+ 

35 

unused 

4 

A0- 

20 

Dl- 

36 

unused 

5 

A1+ 

21 

D2+ 

37 

unused 

6 

Al- 

22 

D2- 



7 

A2+ 

23 

D3+ 



8 

A2- 

24 

D3- 



9 

A3+ 

25 

D4+ 



10 

A3- 

26 

D4- 



11 

A4+ 

27 

D5+ 



12 

A4- 

28 

D5- 



13 

A5+ 

29 

D6+ 



14 

A5- 

30 

D6- 



15 

extra+ 

31 

D7+ 



16 

extra- 

32 

D7- 




The connector labeled "RS422" may be used to connect an 
RS422 terminal to the camera controller. It is also used to connect 
the camera controller to the VMEbus interface. The nature of the 
contents of these transmissions is described in the camera system 
software manual. 

RS422 Communications Connector Pinout: DB9M 


pin 

name 

function 

1 

TX- 

transmit data - 

2 

TX+ 

transmit data + 

3 

RX- 

receive data- 

4 

RX+ 

receive data + 

5 

GND 

controller ground 

6 

unused 


7 

unused 


8 

unused 


9 

unused 
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There are two 'ST' type fiber optic connectors on the controller 
module that are used when the camera controller is connected to the 
host computer via a fiber optic line. The optical fibers may be used 
instead of the RS422 option. Switching from one to the other requires 
moving a jumper on the fiber optic interface card 

The connector labeled "power" is used to provide the DC 
voltages necessary to operate the controller electronics. The power is 
normally provided by connecting this connector to the power supply 
module with the cables provided. These cables are approximately 3 
meters in length. The power supply voltages provided must be 
regulated, as no regulation takes place inside the module. 

Controller Module Power Connector : DB15M 


pin voltage 

1 -15V 

2 -15V 

3 +5V 

4 +5V 

5 +15V 

6 +15V 

7 +28V 

8 +28V 


pin voltage 


9 

GND 

10 

GND 

11 

GND 

12 

GND 

13 

GND 

14 

GND 

15 

GND 


3.3 Controller Card 

The camera system controller is based around a version of the 
Motorola MC68HC11 microcontroller. Produced by Motorola for New 
Micros Inc., the F68HC11FN microcontroller contains a FORTH 
interpreter in the internal ROM. All camera operation is coded in a 
mixture of FORTH and assembler code. System software may be 
extended by the user, and modifications may be retained from 
session to session. See the AIS1 camera system software manual for 
details concerning the FORTH software. 

The controller board is a modified version of a camera 
controller board we designed, based on the AIS1 prototype, for a 
somewhat different camera. Therefore, some of the parts of the 
controller board are not populated, and are irrelevant to this 
discussion. 

The central processing unit is Ul, the 68HC11. The 68HC11 
contains a variety of on chip peripherals which are used in this 
system. The 8k ROM contains the Max-FORTH interpreter. The 256 
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bytes of SRAM are used by the FORTH system. The on chip EEPROM is 
used for interrupt vectors. The timer subsystem is used as a free 
running millisecond timer. The Serial Communications Interface (SCI) 
is used for communication with the host computer. Various port bits 
are used to control other circuits such as the shutter driver. The 
Serial Peripheral Interface (SPI) is unused. 

The 68HC11 is clocked by U4, an 8 MHz crystal oscillator. The 
68HCll's instruction cycle when clocked at this frequency is 2 MHz. 

The 68HCll's multiplexed address/data bus is demultiplexed 
by U3, a 74HC573 transparent latch. 

U5 is a DS1231 from Dallas Semiconductor which provides a 
clean reset pulse to the 68HC11 during power up and power down. 

U6 is a DS8921 IC from National Semiconductor. This IC 
translates the TTL level SCI signals from the 68HC11 into the RS422 
level signals connected to the RS422 connector on the outside of the 
camera controller module chassis. 

U8 is a 32k x 8 bit static RAM device used to hold the FORTH 
dictionary while the 68HC11 is running. U15, shown on the schematic 
as a 32k x 8 bit EPROM is actually a 28C256 32k x 8 EEPROM device 
which may be programmed in the circuit. This EEPROM holds the 
default FORTH dictionary. When the system is reset, the contents of 
this EEPROM are copied into the SRAM. The contents of the SRAM 
may be copied into the EEPROM at any time via the FORTH command 
set. 

U16 is a 74HC574 latch which may be written to by the 
68HC11 to control external hardware. At this time U16 and the 
outputs located on P3 of the controller card are uncommitted, and 
not brought out through the controller module chassis. 

U7 is a programmable logic device (PLD) used to decode the 
addresses generated by the 68HC11 and produce the chip select 
signals needed by the various peripherals. The listing for this PLD is 
provided after the schematics at the end of this section. 

U18 is not installed. Before modifying the board to accept the 
28C256 EEPROM, the SRAM was supplied with backup current from a 
battery when the system was not powered up. This IC managed the 
SRAM's power. 

U2, a 68HC24 "port replacement unit" from Motorola is not 
installed. The card was designed for use in a camera controller using 
a DSP located on this card as sequencer. U2 was used by the 68HC11 
to communicate with that DSP. U9 was the DSP sequencer in that 
camera. It is not installed. U10, Ull, U12, U13, and U17 were 
associated with that sequencer and are not installed. This camera has 
a separate sequencer card, and there is a DSP56001 on it instead. 
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The 68HCll's address and data bus, along with several I/O port 
lines, are connected to PI, the motherboard connector. These lines 
are then fed across the motherboard to the other cards in the system. 
The connector is shown on page 3 of the controller card schematic. 
The relevant lines are : 


D0-D7 
A08 - A15 
OE* 

WE* 

AS 

E 

RESET* 
PAO - PA7 
PEO - PE3 


The 68HCll's data bus 

The 68HCll's address bus 

A qualified ’read' signal from the 68HC11 

a qualified 'write' signal from the 68HC11 

the 68HCll's address strobe 

the 68HCll's instruction clock 

the system reset, produced by U5 

68HC11 port A 

4 bits from 68HC11 port E 


The controller card uses power only from the +5V supply, and 
returns current only to the digital ground, named 'gnd' on the 
schematics. There is no +15V or -15V supply current used on this 
card. 
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3.3.1 Controller Card Schematic Diagram 
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3.3.2 Controller Card Logic Equations 


Name 

AISDCD; 

Partno 

none assigned; 

Date 

1/24/91; 

Revision 

01; 

Designer 

Doherty; 

Company 

Advanced Technologies; 

' ssembly 

new AI3CTL address select ; 

J|^tion 

^wice 

U?; 

G16V8; 


/* This file contains the source code for the AIS controller 
/* address decode PAL. */ 

/* *1 

/* */ 

/* */ 

/* */ 

/* */ 

/* Revision history : */ 

/* */ 

/* Rev. 01 1/25/91 */ 

/* */ 

/* */ 

/* */ 

/* Target Device = Lattice GAL16V8 as PAL16L8 */ 

/* */ 


/* inputs */ 

D in 1 = al5; 

/* 6811 address 15 */ 

k| 2 = a!4; 
P 3 = al3; 

/* 6811 address 14 */ 

/* 6811 address 13 */ 

Pin 4 = al2; 

/* 6811 address 12 */ 

Pin 5 = all; 

/* 6811 address 11 */ 

Pin 6 = as; 

1 * 6811 address strobe */ 

Pin 7 = eelk; 

/* 6811 E clock */ 

Pin 8 = rd; 

/* 6811 RD/WR* strobe *1 

Pin 9 = [reset; 

/* system reset */ 

/* outputs *1 

Pin 13 = [latch; 

/* output latch select */ 

Pin 14 = !ram; 

1 * chip select for RAM */ 

Pin 15 = [eeprom; 

/* chip select for EEPROM */ 

Pin 16 = memdis; 

/* memory disable; used internally */ 

Pin 17 = !oe; 

/* system output enable */ 

Pin 18 = !we; 

/* system write enable */ 


/* addr is the address inputs as a five bit word */ 

FIELD addr = ;al5.. Hi ; 

/* RAM will go from $0000 to $5fff for a total of 24k */ 
ram = addr: i 0000 . . 5FFFc & [memdis & [reset; 

I* EEPROM will go from $6000 to $DFFF for 32k with some holes */ 
eeprom = addr: ; 6000 . .DFFFc & imemdis & [reset; 

^Bthe output latch will go from $B800 to $B8FF */ 
latch = addr : i B800 . . BFFFc, & imemdis & [reset; 


memdis = addr:iB000..3FFFc 


/* internal 68HC11 I/O registers */ 


? addr::COOO..C7FF,; 
? addr:;C300..CFF?d 
? addr:iEOOO..FFFFi 
? reset ; 


/‘ DSP location '! 
/* temp/shutter board location */ 
/* internal FORTH in ROM */ 


'* output enable for various 
a z rd 4 ecik & I reset ; 


devices */ 


/* write enable for writable devices */ 
we = i rd & eclk & i reset ; 




i 



3.3.3 Controller Card PCB Artwork 
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3.4 Sequencer Card 

The sequencer card generates all the timing necessary to 
operate the CCD and the analog processor. The sequencer card 
includes a Motorola DSP56001 digital signal processor (DSP). The DSP 
operates with a 100 ns instruction cycle. The DSP bootstraps its 
program code from the 68HC11 through the host interface. 

A portion of the DSP's address and data busses is differentially 
driven on a short cable to the clock generator. Eight bits of data and 
six bits of address information, as well as a write strobe, are 
provided. The DSP performs CCD control by writing to memory 
mapped devices on the clock generator. Up to eight unique clock 
generators may be addressed. Any subset of the eight clock 
generators may be accessed simultaneously. The DSP may write to 
the clock generator locations at its full execution rate of 10 MHz. 

The heart of the sequencer card is Ul, the DSP56001, it 
produces all the signals required to operate the CCD and analog 
processor by writing data into registers on the clock cards. It does so 
under command from the 68HC11 on the controller card. 

The DSP includes a host interface port, through which 
commands and data may be transferred. This byte wide bi- 
directional interface is tied to the 68HCll's address data bus through 
the motherboard. The eight registers of the DSP host interface appear 
to the 68HC11 as memory locations at addresses $C000 to $C007. 
The details of the operation of the host interface are beyond the 
scope of this document. See chapter 10 of the DSP56001 user's guide 
for more information. Since the 68HCll's address/data bus is 
multiplexed, U5, a 74HC573 transparent latch, is used to latch the 
low order address bits. The 68HC11 controls the operating state of 
the DSP through U4, a 74HC574 latch, via which it may reset the DSP 
and issue interrupts. This latch appears in the 68HCll's memory 
space at address $C100. A programmable logic device, U3, a 
PAL16L8, is used to decode the 68HCll's address bus and generate 
the chip selects for the DSP interface and the DSP control latch. 

The DSP has three memory spaces. These are referred to as 
'program' memory, 'x data' memory, and 'y data' memory. The DSP 
program resides in program memory of course. At startup the DSP 
has no program to execute. The DSP is then reset by the 68HC11 in a 
bootstrap mode in which it loads its internal program memory with 
words transferred through the host interface. Additionally, the DSP 
has access to an external memory device, U2, a MCM56824 8k x 24 
bit static RAM from Motorola designed specifically for the DSPS 6001. 
The DSP also loads this memory through the host interface. 
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The DSP's address bus is decoded by U8, a PAL16L8-10 from 
Texas Instruments. Chip selects are generated for the DSP's various 
peripherals. U2, the external SRAM, is one of these. Additionally, 
there are two 16 bit data ports. One of these, composed of P2 U9, and 
U10 is a 16 bit wide input port. The other, composed of P3, Ull and 
U12, is a 16 bit output port. These ports are not currently used in 
the system and the connections are not brought to the outside of the 
controller module chassis. 

The DSP's lowest 8 data bits and lowest 7 address bits are 
connected to a set of differential drivers, U13,U14, U15,U16. These 
differential drivers are of the 41 LG type manufactured by AT&T 
Microelectronics. They produce a "pseudo ECL' output which may be 
driven at high speeds over relatively long distances. The output pairs 
from these drivers are tied to a PC board mounted male DB37 
connector. The pin out of this connector is shown below. Note that 
this is the same pinout as for the DB37 on the controller module 
chassis. There is a one to one ribbon cable connecting the two. 


Sequencer Card P4 Connector Pinout: 


pin 

function 

pin 

function 

pin 

function 

1 

WR+ 

17 

D0+ 

33 

unused 

2 

WR- 

18 

D0- 

34 

unused 

3 

A0+ 

19 

D1+ 

35 

unused 

4 

A0- 

20 

Dl- 

36 

unused 

5 

A1+ 

21 

D2+ 

37 

unused 

6 

Al- 

22 

D2- 



7 

A2+ 

23 

D3+ 



8 

A2- 

24 

D3- 



9 

A3 + 

25 

D4+ 



10 

A3- 

26 

D4- 



11 

A4+ 

27 

D5+ 



12 

A4- 

28 

D5- 



13 

A5+ 

29 

D6+ 



14 

A5- 

30 

D6- 



15 

A6+ 

31 

D7+ 



16 

A6- 

32 

D7- 
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3.4.1 Sequencer Card Schematic Diagram 




3-24 



























3.4.2 Sequencer Card Logic Equations 


Name 

DSPIO; 

Partno 

none assigned; 

Date 

4/2/91; 

Revision 

01; 

Designer 

Doherty; 

Company 

Advanced Technologies; 

^sembly 

DSP card DSP address decoder 

nation 

U8; 

Wice 

P16L8; 


/* * l 

I* DSP address decoder *1 


I* 

I* 

I* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 


*/ 

*/ 

*/ 

*/ 


Revision history : 
Rev. 01 4/2/91 


*********************** ************** 


Target Device = 16L8 
******** **************** ************* 


V 

V 

V 
*1 

V 

*********************** »★******/ 

*1 

*1 

*/ 


/* inputs */ 

Pin 1 = !ps; /* program memory select */ 


pin 2 = ids; /* data memory select */ 

• 3 = !rd; /* dsp read signal */ 

4 = !wr; /* dsp write signal */ 

Pin 5 = xdata; /* x data memory select */ 

Pin 6 = ! reset; /* system reset */ 

Pin 7 - al5; /* DSP address 15 */ 

Pin 8 = al4; I* DSP address 14 */ 

Pin 9 = al3; /* DSP address 13 */ 

Pin 11 = al2; I* DSP address 12 *1 

Pin 13 = all; I* DSP address 11 *1 

Pin 14 = alO; /* DSP address 10 *1 

Pin 15 = a09; /* DSP address 09 */ 

Pin 16 = a08; /* DSP address 8 */ 


/* outputs */ 

Pin 17 : !ram_cs; 
Pin 18 = !od_clk; 
Pin 12 = !id_en; 
Pin 19 = !cam_wr; 


/* DSP RAM chip select 
/* output data clock 
/* input data enable 
/* qualified write strobe 


*1 

*/ 

*/ 

for camera */ 


/* addr is the address inputs as a five bit word */ 
FIELD addr = ial5..a08c; 


the DSP's external RAM 
for a total of 8K */ 


is at P : $0000 to P:$1FFF *1 


ram_cs = addr 000 0..1FFFj, & ps & 'reset; 

/* output data latch is write only at y:$0000 to y:$00FF *1 
od_clk = addr: ; 0000. .OOFFi i ds & ixdata & wr k ! reset; 



/* incut data latch is read only at y : $0000 to y:$FFFF */ 
id_en' = addr: ;0C00. . OOFFi 4 ds 4 ixdata 4 rd 4 ! reset; 

I* cam.wr is a qualified version of the DSP’s write pulse */ 
/* the camera is write only at Y:$FFOO to Y:$FFFF */ 
am_wr = addr: ;FF00. .FFFFi 4 ds 4 Ixdata 4 wr 4 ! reset; 



Name 

DSPDCD; 

Partno 

none assigned; 

Date 

1/24/91; 

Revision 

01; 

Designer 

Doherty; 

Company 

Advanced Technologies; 

^sembly 

new AISDSP address select; 

Ration 

03; 

Wice 

G16V8; 




This file contains the source code for the AIS controller 
address decode PAL. 


I* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

I* 

/* 

/* */ 

/* Target Device = Lattice GAL16V8 as PAL16L8 V 

/* */ 


Revision history : 
Rev. 01 1/25/91 


*/ 

*/ 

*/ 

*/ 

*/ 

V 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 


/* inputs */ 

Pin 1 = al5; /* 6811 address 15 */ 

• 2 = al4; /* 6811 address 14 */ 

3 = al3; /* 6811 address 13 *1 

Pin 4 = al2; /* 6811 address 12 */ 

Pin 5 = all; /* 6811 address 11 */ 

Pin 6 = alO; /* 6811 address 10 */ 

Pin 18 = a09; /* 6811 address 09 */ 

Pin 17 = a08; /* 6811 address 08 */ 

Pin 7 = !reset; /* system reset *1 

Pin 8 = eclk; /* 6811 E clock */ 

Pin 9 = ! oe ; /* system output enable */ 

Pin 11 = !we; /* system write enable */ 


/* outputs */ 

Pin 13 = !dsp_wr; 
Pin 14 = !dsp_cs; 
Pin 19 = !dsp_ctl; 


/* DSP host port write signal */ 
/* DSP host port chip select */ 
/* DSP control latch select *1 


I* addr is the address inputs as a five bit word */ 
FIELD addr - [a!5*.a08^; 

I* The DSP's actual address range is $0000 to $C7FF */ 


dsp.cs 


addr:iC000..C0FFi & we & eclk & ! reset ) I* write cycle */ 
addr:;C000..C0FFi & ! reset ); I* read cycle */ 



dsp.cs 4 we; 


dsp_ctl = addr: ;C100 . .C1FF£ 4 Ireset; 



3.4.3 Sequencer Card PCB Artwork 
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3.5 Temperature and Shutter Control Card 

The temperature/shutter card contains the circuitry needed by 
the 68 HC 11 to operate an electric solenoid shutter and to measure 
and control the CCD temperature. 

The board used in this system was, as has been previously 
mentioned, designed originally for use in a different camera system. 
It has been adapted for use in this camera system. The original 
system incorporated two shutters and four temperature sensors. In 
this application we require only one shutter and one temperature 
sensor, and so various parts of the board have been left un-installed 
because they are not being used. 
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3.5.1 Temperature and Shutter Control Board 
Schematic Diagrams 
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3.5.2 Temperature and Shutter Control Board 
Logic Equations 


Name 


DdC6 

Revision 

Designer 

Company 


seirn.y 

w0ca0-.cn 

Device 


AISTFAL; 
none assigned; 



'Ji ; 

Doherty; 

Advanced Technologies; 

Ais temperature control board decoder; 


G22V10; 


/* AIS temperature/shutter board decoder pal */ 

/* this board is the same as in the APL cameras. */ 


*/ 

*/ 



/* inputs *1 
Pin 1 = al5; 
’’in 2 = al4; 
rn 3 = al3; 
Pin 4 = al2; 
Pin 5 = all; 
Pin 6 = alO; 
Pin 7 = a09; 
Pin 8 = a08; 
Pin 9 = d7; 
Pin 10 = d6; 
Pin 11 = d5; 
Pin 13 = d4; 
Pin 14 = d3; 
Pin 15 = d2; 
Pin 16 = dl; 
Pin 17 = aO; 
Pin 18 = !we; 
Pin 19 = as; 


/* 5811 address 15 

/* 6811 address 14 */ 
/* 6811 address 13 */ 
/* 6811 address 12 *1 
I* 6811 address 11 */ 
/* 6811 address 10 */ 
/* 6811 address 09 V 
/* 6811 address 08 */ 


/* 6811 address/data 07 ( not used ) */ 
/* 5811 address/data 06 ( not used ) */ 
I* 6811 address/data 05 ( not used ) */ 
/* 6811 address/data 04 ( not used ) ’/ 
/* 6811 address/data 03 ( not used ) */ 
/* 6811 address/data 03 ( not used ) */ 
/* 6811 address/data 02 ( not used ) */ 
/* 6811 address/data 01 ( not used ) ’/ 
/* system write strobe */ 
t r 6811 address strobe ( not used ) */ 


/* outputs */ 

Pin 20*= iwrite; /* write strobe for this board */ 
Pin 21 = !dac_sel; /* dac chip select */ 
Pin 22 = ichanA; /* dac channel select A */ 
Pin 23 = ! range; /’ range latch chip select */ 


/* addr is the upper address inputs as an eight bit word */ 
"HID addr = ;a!5..a08i; 


/* the temperature DAC needs three signals ; a write pulse, */ 

/* a chip 'select, and a channel select. *1 

■ * ;he -write pulse will be generated directly from the we input */ 


write = we; 


/* the DAC will be located at address $C200 to $ C2FF */ 

^^_sel = addr:iC200..C2FFi; 

^^the channel select will be based directly on address line 3 */ 
chanA = !a08; 


/* the range select latch, used for setting the temp sense range */ 
/* will be located at address $C300 to $C3 FF. It is write only. */ 


range = addr : ; C300 . .C3FF£. & write ; 



3.6 Controller Module Motherboard 

The controller card, sequencer card, and temperature/shutter 
control card are connected via a simple motherboard. The 
motherboard has four slots. Of these, one is unused and available for 
future expansion. 

Each slot on the motherboard contains a 96 pin female DIN 
connector. The first three slots on the motherboard are bussed 
together on a one to one basis. The fourth slot, which the 
temperature/shutter control card must occupy, has a different 
pinout. 

Power for the three cards comes through the motherboard. It is 
connected from the DB15 connector labeled 'POWER' on the outside of 
the controller module chassis to the PI connector on the 
motherboard. The connector is just a set of pads on the circuit card 
and the wires supplying the power are soldered directly into the 
holes in the card. The pinout of this connector is shown below. 

Motherboard Power Connector Pinout: 

pin function 

1 ground 

2 +5v 

3 -15V 

4 +15V 

5 analog ground 

6 +28V 
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3.6.1 Controller Motherboard Schematic 
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3.6.2 Controller Motherboard PCB Artwork 
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3.7 Fiber Optic Interface 

There is a small circuit board inside the controller module that 
is not connected to the motherboard. This circuit board holds the 
fiber optic driver receiver pair that may be used to connect the 
camera to the VMEbus interface. It also holds the connections for the 
RS422 data transmissions as well as an integrated circuit, a 74HC244, 
and jumpers which allow the user to select either RS422 or fiber 
optic communications. 

Connector PI is used to connect the fiber optic interface to the 
controller card. A 10 wire IDC ribbon cable is used. It connects from 
this point to P2 on the controller card. 

P3 and P9 are the fiber optic components themselves. 

U3, the 74HC241, is used to select between the two 
communications channels. Jumpers J1 and J2 are used to make the 
selection. 



3.7.1 Fiber Optic Interface Schematic Diagram 
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3.7.2 Fiber Optic Interface PCB Artwork 
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4. Clock/ Analog Modules 

4.1 Module Overview 

The clock/analog modules contain the circuitry required to 
measure the charge of the pixels on the CCD imager. They contain 
digital to analog converters to generate the CCD clock rail potentials 
and CCD reference voltages. They contain the switches used to clock 
the CCD, the latches that control those switches, and the buffers that 
drive the CCD. They also contain the circuitry used to process and 
digitize the CCD video signal and to send that data to the VMEbus 
interface cards. The clock/analog modules' temperatures are 
regulated to assure that temperature related drift in the video 
processing circuitry does not interfere with the accuracy of the CCD 
data. 

One clock/analog module (CAM) consists of two circuit boards 
in a temperature regulated enclosure. The clock board contains the 
digital circuits used to communicate with the controller and CCD clock 
timing, voltage and drive circuitry. The analog board consists of the 
analog processor, analog to digital converter (ADC), and data 
transmission logic. These boards are each discussed in turn below. 

4.2 Connectors and Pinouts 

There are several connectors on the outside of the CAM chassis. 
Two connectors serve as input and output for the control signals 
from the sequencer. 

One connector provides the camera data and clock signals on a 
pair of RS422 serial lines. Additionally, there are two ST-type fiber 
optic connectors providing the clock and data signals in an optical 
form. The pinout of the camera data connector follows. 

Camera Data Connector : DB9 

1 data clock + 

2 data clock - 

3 data - 

4 data + 

5 ground 

6 unused 

7 unused 

8 unused 

9 unused 
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The connector labeled "power" is used to provide the DC 
voltages necessary to operate the controller electronics. The power is 
normally provided by connecting this connector to the power supply 
module with the cables provided. These cables are approximately 3 
meters in length. The power supply voltages provided must be 
regulated, as no regulation takes place inside the module. 


CAM Power Connector : DB15M 


pin 

voltage 

pin 

voltage 

1 

-15V 

9 

GND 

2 

-15V 

10 

GND 

3 

+5V 

11 

GND 

4 

+5V 

12 

GND 

5 

+15V 

13 

GND 

6 

+15V 

14 

GND 

7 

+28V 

15 

GND 

8 

+28V 




The CAMs are connected to the controller module in a 'daisy- 
chain' fashion in which the control signals pass through one board to 
the next. A cable is connected from the ’control source’ connector on 
the controller module to the 'control in' connector on one of the 
CAMs. Another cable is then routed from the 'control out' connector 
on that CAM to the 'control in’ connector on the next. The cables used 
are of the one to one type. The pinout of the connectors on the CAMs 
is the same as on the controller module. 


Camera Control Connector Pinout : DB37 


pin 

function 

pin 

function 

pin 

function 

1 

WR+ 

17 

D0+ 

33 

unused 

2 

WR- 

18 

D0- 

34 

unused 

3 

A0+ 

19 

D1+ 

35 

unused 

4 

A0- 

20 

Dl- 

36 

unused 

5 

A1 + 

21 

D2+ 

37 

unused 

6 

Al- 

22 

D2- 



7 

A2+ 

23 

D3+ 



8 

A2- 

24 

D3- 



9 

A3+ 

25 

D4+ 



10 

A3- 

26 

D4- 
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11 

A4+ 

12 

A4- 

13 

A5+ 

14 

A5- 

15 

extra+ 

16 

extra- 


27 

D5+ 

28 

D5- 

29 

D6+ 

30 

D6- 

31 

D7+ 

32 

D7- 


4.3 Clock Generator Card 

The clock generator card consists of all the analog circuitry 
associated with the production of the CCD clock and reference signals 
for one CCD output port. It also contains enough digital circuitry to 
interface to the camera control module. The clock generator is the 
only interface between the camera control module and the CAM. 

The 'control in' and 'control out' connectors on the CAM chassis 
are connectors PI and P2 on the clock generator card. The 'control in' 
connector is tied to the 'control source' connector on the camera 
control module by a DB37 cable with one to one wiring. Another 
cable may be used to connect this CAM with another. As many as 
eight uniquely addressable CAMs may be daisy chained in this way. 
Termination resistor packages RP1 to RP6 are installed in the last 
module in the chain. 

The address map of the clock generator modules contains 30 
write-only byte wide registers that are addressed by the controller. 
These registers are used to direct all operations of both the clock and 
analog boards. Twenty-four registers are used to set CCD clock rail 
and operating voltages. The remaining registers are used to operate 
the analog processor and ADC, and operate switches used to generate 
CCD register clocks. The address map of the clock generator card is 
shown below. 


AIS1 Clock Generator Address Map 


CAM ID. 

Voltage DACs 
Serial Clock Control 
Parallel Clock Control 
Other Clock Control 
Analog Processor Control 
CAM Configuration 


$FF00 

$FF08 -> $FF1F 

$FF20 

$FF24 

$FF28 

$FF2C 

$FF30 


4.3.1 Sequencer Data Interface 
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The differentially driven DSP address and data signals from the 
controller module are received by a set of 4 ILF type receivers from 
AT&T, U1 to U4. All the devices on the clock generator card that the 
DSP may control appear as memory locations in the DSP's 'y data' 
memory space. The various clock generator cards in the system share 
common address locations, but may be enabled or disabled 
selectively by the DSP program. At address location $F000, 
commonly available on all boards at all times, is the CAM ID latch, 
used by the DSP program to determine which CAMs will receive the 
following control sequences. The DSP writes a value to this latch. Each 
bit of the output is tied to on pin on one side of eight position jumper 
block Jl. The other pins on the other side of J1 are all connected to 
the enable line referred to as ID* on the schematics. If this line is 
low, then the address decoders will respond to write accesses from 
the DSP. Each CAM is configured with one jumper in place on Jl. The 
position of this jumper determines which 'ID' bit the CAM will 
respond to. In this way, as many as eight uniquely addressable CAMs 
may coexist in the system, CAMs may share IDs if desired, and the 
DSP may access any subset of the addressable CAMs simultaneously. 

4.3.2 CAM Configuration Latch 

The clock generator card contains one latch referred to as the 
CAM configuration latch. This latch is used to enable and disable 
various parts of the clock generator for diagnostic and CCD test 
purposes. The latch, U10, a 74F273 type, has 5 outputs which are 
used. Bit 0 is used to enable and disable the CCD clocks as discussed 
below in section 4.3.4. This bit has an active high sense. The other 
bits are active low. Bit 1 may be used to disable the analog control 
signals, bit 2 may be used to disable the parallel clocks (useful when 
testing CCD devices for charge injection through these clocks), bit 3 
enables the serial clock control latch, also useful for testing, and bit 4 
controls the output of U14, which controls a variety of CCD signals, 
including the transfer gate, CCD reset gate, and summing well. 

The default condition for the CAM configuration latch is 
determined by U5, a power monitor IC which resets this latch at 
power up. The CCD control latch outputs are then all enabled, but the 
CCD clocks are disconnected from the analog card. 

4.3.3 CCD Voltage Digital to Analog Converters 

All the DC voltages needed, both as clock rail settings and DC 
references, are generated on the clock module for the CCD or CCD 
output port that it is connected to. Separate clock voltages and 
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control signals are generated for the CCD parallel register, serial 
register, parallel transfer gate, summing well, and reset gate. Two 
spare clock lines are available for future use. The parallel and serial 
clocks may be set to any of three voltages: low, midrange, or high. 
There are four serial and four parallel register clock lines that may 
be programmed with independent timing, but common clock voltage 
rails. 

Eighteen programmable voltages are available as clock rail 
voltages for driving the CCD clocks. Other programmable voltages are 
used to control the operating point of the output amplifier and other 
static levels such as substrate and last or output gate potential. The 
voltages are established by twenty-four eight bit DACs programmed 
by the DSP. Each clock rail may be programmed in 256 equal 
increments over the range of voltages listed in Table 4.1. 

TABLE 4.1 

Programmable Clock Rails and Voltage Ranges 


address 

dock signal 

range 

(volts) 

$FF08 

parallel low 

-12.5 

+12.5 

$FF09 

parallel midrange 

-12.5 

+12.5 

$FFOa 

parallel high 

-12.5 

+12.5 

$FFOb 

serial low 

-12.5 

+12.5 

$FFOc 

serial midrange 

-12.5 

+12.5 

SFFOd 

serial high 

-12.5 

+12.5 

SFFOe 

transfer gate low 

-12.5 

+12.5 

$FFOf 

transfer gate high 

-12.5 

+12.5 

$FF10 

summing well low 

-12.5 

+12.5 

$FF11 

summing well high 

-12.5 

+12.5 

$FF12 

substrate 

-3.0 

+3.0 

$FF13 

last gate 

-5.0 

+5.0 

$FF14 

reset gate low 

0 

+15.0 

$FF15 

reset gate high 

0 

+15.0 

$FF16 

reset drain 

+5.0 

+20.0 

$FF17 

output drain 

+5.0 

+25.0 

$FF18 

spare gate 1 low 

-12.5 

+12.5 

$FF19 

spare gate 1 high 

-12.5 

+12.5 

$FFla 

spare gate 2 low 

-12.5 

+12.5 

$FFlb 

spare gate 2 high 

-12.5 

+12.5 


current source 

-12.5 

+12.5 


spare 1 

-12.5 

+12.5 
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The voltages from the DACs are then filtered and buffered 
using simple operational amplifier based filter circuits. These circuits, 
constructed around U16, U17, U21, U22, and U23, provide gain and 
offset correction to transform the voltages from the 0 to 5 volt range 
of the DACs to the ranges listed above in Table x. All the DC voltages 
thus produced are tied to test points located in one corner of the 
printed circuit board. The voltages used as CCD clock rail potentials 
are then tied to the inputs of a set of analog switches used to toggle 
the CCD clock line from one potential to the other. 

4.3.4 CCD Clock Switching 

The CCD clock switches are controlled by the sequencer writing 
eight bit data values in to the CCD control latches U12, U13, and U14, 
74F574 type octal flip flops. U12 controls the CCD parallel clocks, U13 
controls the CCD serial clocks, and U14 controls the other clocked 
signals, including the CCD reset gate, summing well, and transfer gate. 
Since the parallel and serial clocks are tri-level, each CCD parallel and 
serial clock is controlled by two bits in the appropriate register. The 
reset gate, summing well, transfer gate and other signal are 
controlled by only one bit since they have only two possible settings. 

The CCD parallel clocks are switched by U27, U28, U29, and 
U30, DG413 type analog switches from Intersil. The resulting clock 
signals then pass through U31, an HI-201HS type analog switch, and 
to P4 the connector that brings the CCD clocks to the buffers and 
resistor networks on the analog card. 

The CCD serial clocks are switched by U34, U35, U36, and U37, 
HI-201HS type analog switches. These switches are chosen for their 
speed. The outputs of these switches then pass through U38, also an 
HI-201HS type switch, then to the P4 connector. 

The switches U31 and U38 mentioned above, as well as U42 for 
the reset and summing well potentials, U39 for the transfer gate, and 
U43 and U44 for various other CCD signals, are used to allow the 
camera controller to effectively disconnect the CCD signals generated 
on the clock card from the analog card. This allows the control 
program to essentially turn the CCD off. These switches are controlled 
by bit 0 in the CAM configuration latch. At power-up reset, a DS1231 
power monitor circuit resets the CAM configuration latch, assuring 
that the CCD clocks are initially disconnected from the analog card. 

P4 : CCD clock connector 

2 parallel clock 1 28 unused 
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4 

parallel clock 2 

30 

unused 

6 

parallel clock 3 

32 

CCD substrate (unused) 

8 

parallel clock 4 

34 

summing well clock 

10 

transfer gate 

36 

reset gate clock 

12 

serial clock 1 

38 

summing well low 

14 

serial clock 2 

40 

summing well high 

16 

serial clock 3 

42 

reset gate low (unused) 

18 

serial clock 4 

44 

reset gate high 

20 

extra clock 4 

46 

VLG CCD last gate 

22 

extra clock 3 

48 

VOD CCD output drain 

24 

extra clock 2 

50 

VRD CCD reset drain 

26 

extra clock 1 




All other pins on the P4 connector are tied to ground. 


4.3.5 Analog Processor Control 

The CCD video processing circuitry, located on the analog card, 
must be operated synchronously with the CCD clock timing. The 
various signals that control the CCD signal processing and digitization 
are generated on the clock card. Eight bits of digital control are 
provided by Ull, the analog control latch, a 74F574 type octal flip 
flop. 

Of the eight signals provided, six are currently used. They are 
covered in more detail in the description of the analog card itself. On 
the clock card, they are simply taken from the control latch and tied 
to the connector labeled P3. Connector P3 is also where the clock card 
power is provided. The CAM power is connected to PI on the analog 
card, and connected to the clock card by a ribbon cable at P3. The 
pinout for this connector is shown below. 

P3 : Power/Analog Connector 


1,2, 3,4 
5, 6, 7, 8 
9, 10, 11, 12 
13, 14, 15, 16 

18, 20, 22, 24 

26 RIN 

28 DCR 


+28 Volts 
+15 Volts 
+5 Volts 
-15 Volts 

unused 

integrator reset 
DC Restore 
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30 

SA1 

sample 1 

32 

SA2 

sample 2 

34 

CTC 

command to convert 

36 

SEN* 

data send enable 

38 

extra 


40 

LPIX 

'last pixel' (no longer used) 
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4.3.6 Clock Generator Card Schematic 
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4.3.7 Clock Generator Card PCB Artwork 
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4.4 Analog Processor Card 

The analog processor consists of several distinct parts. There is 
the analog processing circuitry itself, there is temperature regulation 
circuitry, and there are CCD clock signal buffers. Each part will be 
discussed in turn below. 

4.4.1 CCD Video Processing Circuitry 

The CCD video signal enters the clock analog module on pins 19 
and 37 of P5, a DB37 that connects to the feed through connector on 
the side of the camera head. 

The signal is passed first to a differential amplifier composed of 
Ul, an AD842 from Analog Devices, and resistors Rl, R2, R3, and R4. 
This differential amplifier eliminates common mode signals between 
the camera head electronics and the analog processor circuitry. 
Jumpers J1 and J2 allow one to ground both inputs to this amplifier 
to test the noise floor of the processor alone. This differential 
amplifier has a gain equal to R2/R1 and R1=R3 and R2=R4. This gain 
was set to 1.37. 

The signal from the differential amplifier next is fed to the DC 
restore amplifier, which clamps the reference signal of each pixel to 
ground level. The gain of this stage is equal to: 

1 + ( (R7*R7A) / (R7 + R7A) ) / R6 

R7A is not normally needed and is included in the circuit only 
as a convenient way to adjust the gain of the system. When the STIS 
AIS1 camera was delivered to NASA, this component was not 
installed. 

After the DC restore section the signal branches, with one half 
going through a precision inverter. This inverter is constructed using 
a low drift op-amp and .01% precision low temperature coefficient 
resistors. The accuracy and stability of this inverter are very 
important in the overall performance of the circuit. 

The DC restored signal and the inverted signal are then fed into 
the integrator. The integrator is built around U8. JFET transistors Q1 
and Q2 are used to selectively connect the video signals to the 
integrator input. These switches are controlled by TTL lines named 
SA1 and SA2 on the schematic diagram. Because these switches 
require a voltage swing of -15 to 0 volts, an analog switch, U5, is 
used to convert the TTL level control signals to the proper scale. 

The integrator includes a DC offset adjustment. In addition to 
serving as a way to balance the offsets of the data from the two CCD 
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ports in the system, the offset adjustment circuit also adjusts the 
video signal to match the -5v to +5v input range on the analog to 
digital converter. Reference voltage U6 provides 10.0 volts to the top 
of the voltage divider formed by R13, VR1, and R14. The DC voltage 
at VRl's wiper contact is fed to the input of the follower formed 
around U7. The resistive components included in this circuit are of 
the low temperature coefficient type for stability. The output of the 
follower is switched across the capacitor by closing an analog switch. 
When the switch is closed, the output of the integrator is charged 
with a time constant equal to (R17*C6). R16 and R17 must be of 
equal value. In order to assure accuracy to 16 bits, the pre charge 
time, when the switch is closed, should be at least 12.5 times the 
time constant (R21*C23). This period is referred to as 'integrator 
reset' in parts of this document. 

The output of the integrator is connected to the input of the 
analog to digital converter, U14, an AM30516 hybrid converter 
module from Analogic. This converter requires approximately 5 usee 
to perform a conversion. During the conversion, the integrator 
switches are all open and the charge on the capacitor is held. No 
sample and hold amplifier is used. The converter does not contain a 
sample and hold. The conversion takes place after the signal 
'command to convert' or 'CTC' is received. 

The digital data produced by the conversion is fed into a shift 
register to prepare for serial transmission. The data are in 
complementary binary form. A PLD, U13, is used to generate the 
clock signal required to transmit the serial data steam. The serial 
data and clock are then fed both to a MC 3 48 7 RS422 transmitter and 
to a pair of fiber optic drivers, with ST type connections. Both 
transmitters are driven at all times. There is a jumper on the 
VMEbus interface to determine which interface is being used. 

4.4.2 Temperature Regulation Circuitry 

Another large portion of the circuitry on the analog card is 
designed to regulate the temperature of the CAM and, more 
specifically, the analog to digital converter. 

A platinum wire RTD is used to sense the temperature of the 
analog to digital converter. This RTD is controlled by the current 
source formed by it and Ula, R80, R81, R82, and VR4. The nominal 
current of 1 mA through the RTD may be adjusted via VR4. 

The voltage drop across the RTD is sensed by U33, an 
instrumentation amplifier. The gain of the amp is set to 100. The 
measured temperature is then scaled by the amplifier built from 
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U32d, R83, R84, and R85 to O.Olv/degree Celsius. The measured 
temperature is then connected to P6 and then to a meter mounted on 
the CAM chassis near the fan. 

A 'desired temperature' is set by adjusting VR5. The voltage 
produced is compared to the actual temperature by the differential 
amplifier formed by U34a, R90, R91, R92, and R93. This 'set point' 
may be measured at pin 5 of U32. At this location it has a scale of 
0.0 lv per degree Celsius. 

The error signal produced by the differential amplifier is then 
fed to two circuits. One of these, as the difference signal becomes 
more negative, increases the current through a large resistor used as 
a heat source. The other, as the difference becomes more positive, 
increases the voltage applied to a small DC fan that draws air in 
through the vent located beneath the analog card, around the boards, 
and out through the fan opening, located beneath the clock card on 
the outside of the clock/analog module. When adjusted for a 
temperature approximately 10 degrees Celsius above the ambient 
temperature, the circuitry will readily stabilize to a point where 
neither the heater nor fan are running very strongly. 

4.4.3 CCD Clock Signal Buffers 

All of the CCD clock signals and DC reference voltages that 
connect from the clock card to the camera head pass through the 
analog card. They arrive from the clock card on P4. The pinout for P4 
is shown below. 


Pinout of Analog Processor Card P4 


2 

parallel clock 1 

28 

unused 

4 

parallel clock 2 

30 

unused 

6 

parallel clock 3 

32 

substrate (unused) 

8 

parallel clock 4 

34 

reset pulse 

10 

transfer gate 

36 

summing well pulse 

12 

serial clock 1 

38 

summing well low 

14 

serial clock 2 

40 

summing well high 

16 

serial clock 3 

42 

reset low 

18 

serial clock 4 

44 

reset high 

20 

extra clock 4 

46 

last gate 

22 

extra clock 3 

48 

output drain 

24 

extra clock 2 

50 

reset drain 

26 

extra clock 1 
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The odd numbered contacts on P4 are unused. 

Those wires are connected to ground on the clock card. 

The serial clocks, parallel clocks, and transfer gate clock are all 
buffered on the analog card using LM6321N buffers from National 
Semiconductor. These buffers provide most of the current required 
to drive the CCD, and they take that current directly from the +15v 
and -15v supplies on the analog card. The buffer circuits provide two 
other features. One is the resistive load to ground on the input. This 
pulls the buffer's output to a near ground potential when the ribbon 
cable is removed from the P4 connector or when the CCD clock 
switches have been disconnected by the analog switches on the clock 
card. Also incorporated into the CCD clock buffer circuitry is an RC 
filter network that may be used to adjust the CCD clock signal rise 
time. These resistors and capacitors are installed in sockets allowing 
for easy replacement should some other time constant be desired. 
Additionally, damping resistors may be placed on the buffer outputs 
to further control signal rise time. Parallel clock drivers are capable 
of driving 0.02 uF loads at 500 kHz. Serial clock drivers are capable 
of driving 500 pF loads at 1 MHz. 

The CCD reset gate and summing well are controlled by analog 
switches located in the camera head. The TTL signals to drive the 
switches and the positive and negative rails for the gates are passed 
through the analog card. The TTL signals are available at test points 
for diagnostic purposes. The DC rail potentials are connected from the 
clock card at P4 to the camera head at P5 through a resistor network. 
One resistor ties the signal to ground, so that the voltage will reach a 
near ground potential when the source voltages are disconnected on 
the clock card or when the clock card is not connected to the analog 
card. Another resistor follows in series; these resistors are meant to 
serve as a part of an RC filter network with capacitors in the camera 
head. They are generally not needed or installed. 

The CCD reference voltages, the output drain voltage, VOD, the 
reset drain voltage, VRD, and the last gate voltage, VLG, are also 
connected to the camera head through resistor networks such as 
those described in the previous paragraph. 

Test points are provided for all the CCD clocks and reference 
voltages. In the case of the serial and parallel clocks as well as the 
transfer gate clock, the test point is located after the buffer amplifier. 

All the CCD clock signals and reference voltages connect to the 
camera head at P5 on the analog card. This connector plugs into a 
connector that feeds through the camera head CCD chamber wall. The 
pinout for this connector is shown below. 
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Pinout of P5 connector on AIS1 analog card 


1 

serial clock 1 

20 

serial clock 2 

2 

serial clock 3 

21 

serial clock 4 

3 

TTL reset 

22 

TTL summing well 

4 

extra clock 1 

23 

extra clock 2 

5 

extra clock 3 

24 

extra clock 4 

6 

parallel clock 1 

25 

parallel clock 2 

7 

parallel clock 3 

26 

parallel clock 4 

8 

transfer gate 

27 


9 

28 

substrate (unused) 

10 

last gate 

29 

output drain 

11 

reset drain 

30 

reset gate high 

12 

reset gate low 

31 

summing well high 

13 

summing well low 

32 


14 


33 

-15v 

15 

-15v 

34 

+15v 

16 

+15v 

35 

+28v 

17 

+28v 

36 

ground 

18 

19 

ground 

CCD video high 

37 

CCD video low 


4.4.4 Analog Processor Card Schematic Diagram 
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4.4.5 Analog Processor Card PCB Artwork 
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4.4.6 Analog Procesor Card Logic Equations 



DEVICE AnalogTiming (PAL16R6) 

" The PAL program is for SBIR analog card 


PIN 

clkin = 

etc = 
en = 
lp = 
enl6 = 

/sclk = 
/elkout = 
/cnt[4:0] = 
/sen = 


BEGIN 

ENABLE ( sclk ) ; 

ENABLE ( elkout ) ; 

sclk = clkout*/sen+sen*lp; 

IF ( enl6 ) THEN 


/sen =(cnt [4] +cnt [3 ] +cnt [2] +cnt [1] +cnt [0] ) * 

( /ent [ 4 ] +cnt [ 2 ] +cnt [ 3 ] +cnt [ 1 ] +/cnt [ 0 ] ) * 

( /ent [4 ] +cnt [3 ] +cnt [2 ] +/cnt [ 1] +cnt [ 0] ) * 

( /ent [4] +cnt [ 3 ] +cnt [2]+cnt [l]+cnt [0]+/lp) ; 

“ Because that the /sen is registered output we need 1 cycle 
earlier for the logic equation. The equation is that 
IF (0) or (17) or (18) THEN stop sending . and 
IF it is last pixel THEN stop on cycle earlier. “ 


2 (input combinatorial) 

5 (input combinatorial) 

6 (input combinatorial) “ start transmitting “ 

4 (input combinatorial) " last pixel actived high" 

3 (input combinatorial) 

“ format selected high=16 bits low= 15 bits 11 
19 (output combinatorial active_low) 

12 (output combinatorial active_low) 

17:13 (output registered active_low) 

18 (output registered active_low) 


ELSE 

/sen =(cnt[4]+cnt[3]+cnt[2]+cnt[l]+cnt[0] )* 

(/ent [4]+cnt [3]+cnt [2]+cnt [l]+cnt [0] ) * 

( /ent [ 4 ] +cnt [ 3 ] +cnt [ 2 ] +cnt [ 1 ] +/ ent [ 0 ] ) * 

( /ent [ 4 ] +cnt [ 3 ] +cnt [ 2 ] +/ ent [ 1 ] +cnt [ 0 ] )* 

(ent [4] +/cnt [3] +/cnt [2] + /cnt [1]+/ ent [0]+/lp) ; 

elkout = clkin* (/ent [4] +cnt [3]+cnt [2] +/ ent [l]+cnt [0] +/ en) ; 

IF (/en) THEN ent [4:0] = 0; 

ELSE BEGIN 

CASE ( ent [4:0]) BEGIN 

0 ) ent [4:0] = 1 ; 

1 ) ent [4:0] = 2 ; 

2 ) ent [4:0] = 3 ; 

3 ) ent [4:0] = 4 ; 

4) ent [4:0] = 5; 

5 ) ent [4:0] = 6 ; 

6 ) ent [4:0] = 7 ; 

7 ) ent [4:0] = 8 ; 

8) ent [4:0] = 9; 

9) ent [4:0] = 10; 


10) 

cnt [4 : 0] 

= 

11 

11) 

cnt [4:0] 

= 

12 

12) 

cnt [4 : 0] 

= 

13 

13) 

cnt [4:0] 

= 

14 

14) 

cnt [4:0] 

= 

15 

15) 

cnt [4: 0] 

= 

16 

16) 

cnt [4 : 0] 

= 

17 

17) 

cnt [4:0] 

= 

18 

18) 

cnt [4:0] 

= 

18 

19) 

cnt [4:0] 

= 

18 

20) 

cnt [4:0] 


18 

21) 

cnt [4:0] 

= 

18 

22) 

cnt [4:0] 

= 

18 

23) 

cnt [4:0] 

= 

18 

24) 

cnt [4:0] 

= 

18 

25) 

cnt [4:0] 

= 

18 

26) 

cnt [4:0] 

= 

18 

27) 

cnt [4:0] 

= 

18 

28) 

cnt [4:0] 

— 

18 

29) 

cnt [4:0] 

= 

18 

30) 

cnt [4:0] 

= 

18 

31) 

cnt [4:0] 

= 

18 


END; 


END; 


END . 


i 


i 




5. Camera Head 


The AIS1 camera head contains the CCD imager itself as well as 
the circuitry necessary to support two channels of video pre- 
amplification. The camera head is an evacuated chamber to allow the 
CCD to be more effectively cooled by the liquid nitrogen dewar to 
which it is connected. The CCD imager easily reaches temperatures 
below -80°C. The controller module and clock/analog modules are 
attached to the sides of the camera head. In the case of the 
clock/analog modules this is to assure that the CCD video signal will 
not have to travel far and therefore will not be corrupted by noise 
pickup. In the case of the controller module, it is more a matter of 
convenience. 

5.1 Overview 

There are two circuit cards located inside the camera head. One 
of these, the 'filter card', is used to condition the DC voltages from the 
clock cards before applying them to the CCD. In most cases this is a 
simple RC filter network, in some it is an emitter follower type of 
transistor circuit. The other circuit card is the 'socket card', which 
holds the CCD itself as well as the video preamplifiers, one for each 
CCD port read. Additionally, there are a number of jumpers on the 
socket card which allow the user to select between the amplifiers 
located at either end of the CCD serial registers. The two cards are 
connected together by a number of interconnects. The two circuit 
cards will be described in more detail later in this section. 

5.2 Camera Head Connector Pinouts 

There are three connectors on the outside of the camera head. 
Two of these are DB37 style and one is a four pin style. Each of the 
two 37 pin connectors are used to bring the CCD clock signals and DC 
power into the camera head for one CCD port. These also bring the 
CCD video signal out of the chamber and to the analog card. P5 on the 
analog card is a vertical PC mount connector allowing the analog card 
inside the clock/analog module to be connected directly to the 
camera head. If necessary, this connection could be broken and a 
short cable put in its place. The DB37 connectors naturally have the 
same pinout as P5 on the analog card. The pinout is shown below. 
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Pinout of DB37 Connectors on AIS1 Camera Head 


1 serial clock 1 

2 serial clock 3 

3 TTL reset 

4 extra clock 1 

5 extra clock 3 

6 parallel clock 1 

7 parallel clock 3 

8 transfer gate 

9 

10 last gate 

1 1 reset drain 

12 reset gate low 

13 sum well low 

14 

15 -15v 

16 +15v 

17 +28v 

18 ground 

19 CCD video high 


20 

serial clock 2 

21 

serial clock 4 

22 

TTL summing well 

23 

extra clock 2 

24 

extra clock 4 

25 

parallel clock 2 

26 

parallel clock 4 

27 


28 

substrate (unused) 

29 

output drain 

30 

reset gate high 

31 

summing well high 

32 


33 

-15v 

34 

+15v 

35 

+28v 

36 

ground 

37 

CCD video low 


The third connector on the camera head is used for the CCD 
temperature control circuitry. One conductor is used to sense the CCD 
temperature, and another is the ground reference for this signal. The 
other two are connected to a resistor mounted in the cold block 
under the CCD to provide heat with which to regulate the CCD 
temperature. The temperature regulation circuitry will be discussed 
in greater detail below. The pinout of this connector is shown below. 

Temperature Sense Connector 

1 

2 

3 

4 

5.3 Filter Card 

All the signals that enter the camera head from the 
clock/analog modules are connected to the filter card. The filter card 
supports two clock/analog modules. The circuitry for the two is 
identical. The signals from the DB37 connectors on the exterior of the 
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camera head are wired to connectors P6 and P7 on the filter card. 
The pinout of these connectors is shown below. 

Filter Card Signal Input Connectors : P6 and P7 


1 

n.c. 

15 

+15V 

29 

serial 2 

2 

n.c. 

16 

+15V 

30 

parallel 2 

3 

n.c. 

17 

+28V 

31 

serial 3 

4 

n.c. 

18 

+28V 

32 

parallel 1 

5 

n.c. 

19 

substrate 

33 

transfer gate 

6 

n.c. 

20 

n.c. 

34 

parallel 3 

7 

n.c. 

21 

clamp 

35 

sum well high 

8 

n.c. 

22 

cur. src. 

36 

sum well low 

9 

n.c. 

23 

VOD 

37 

reset gate high 

10 

n.c. 

24 

VRD 

38 

reset gate low 

11 

-15V 

25 

VLG 

39 

reset TTL 

12 

-15V 

26 

n.c. 

40 

sum well TTL 

13 

ground 

27 

n.c. 



14 

ground 

28 

serial 1 




The serial and parallel clocks, as well as the transfer gate and 
clamp signals pass through the filter card without encountering any 
circuitry. They are connected directly to the CCD socket card. 

The DC power supply voltages that come into the camera head 
are filtered on the filter card. Large hermetically sealed capacitors 
are used to bypass the supplies on each side to their respective 
grounds. 

The CCD reset gate and summing well switches are located on 
the filter card. The DC rails for these signals are filtered and then 
applied to the poles of analog switches. The switches for both the 
reset gate and the summing well on each side are located in a single 
integrated circuit, U1 or U4, HI-20 1HS type switches. The lower rail 
of the reset gate is in fact no tied to the voltage supplied by the clock 
card. It was found experimentally that the noise figures for the 
camera could be improved by tying the lower rail of the reset gate 
switch to the CCD substrate near the CCD output. A wire has been 
added which accomplishes this. 

The substrate signal supplied by the clock card is not used. It 
was found that it was better to tie the CCD substrate to ground 
directly. 

The CCD output drain voltages are filtered by an RC network 
and then buffered by an emitter follower. There is additional 
filtering on the CCD socket card. 
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The CCD reset drain voltages from the clock card are handled 
differently. The system was originally designed to provide separate 
reset drain voltages to the two halves of the CCD. Each of these was to 
have seen an emitter follower on the filter card. It was found that is 
best to tie these two points to the same potential. To that end, one of 
the emitter follower circuits, that built around Qll, has been 
removed and its output tied instead to the output of the circuit built 
around Q4. 

The unused connections on the CCD, those associated with 
amplifiers that are not being used, are tied to a 'holding' voltage. This 
voltage is produced by the voltage divider and emitter follower 
circuit constructed out of R7, R8, and Q2. Capacitors C16, C17, and C18 
are used to stabilize this circuit. The system originally was to have 
another of these circuits built around Q9, but it was determined that 
it would be better to tie all the unused CCD connections to the voltage 
produced by Q2. 

The filter card also holds the circuitry used to sense the CCD 
temperature. A current source draws 1 mA of current through an 
RTD epoxied to the CCD package. The voltage across the terminals of 
this RTD is sensed and amplified by U7, an INA101 type 
instrumentation amplifier from Burr-Brown. The resulting voltage is 
fed through the camera head wall on the four pin connector that 
feeds into the controller module and to the temperature/shutter 
control card. 

The signals from the filter card are passed to the CCD socket 
card via interconnects between the two cards. There are five such 
interconnects. Two identical pairs include all the signals associated 
with the CCD itself, and the fifth includes those signals associated 
with the temperature measurement circuitry. The pinouts of these 
connectors are shown below. 

Filter Card Connectors J1 and J4 

1 serial 1 

2 parallel 2 

3 serial 2 

4 parallel 1 

5 serial 3 

6 parallel 3 

7 transfer gate 

8 CCD reset 

9 unused 

10 summing well 
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Filter Card Connectors J2 and J5 

1 unused (formerly CCD video) 

2 VOD 

3 clamp 

4 VRD 

5 'holding' voltage 

6 VLG 

7 current source 

8 unused 

9 -15V 

10 -15V 

1 1 ground 

12 ground 

13 +15V 

14 +15V 

The temperature measurement circuitry may be powered by 
the +15V and -15V supplies from either analog card. Jumpers on the 
CCD socket card select which will be used. It was found that it made 
no difference which side was used (which is what you’d hope). The 
selected power supplies are brought to the filter card via J3. The 
pinout of this connector is shown below. 

Filter Card Connector J3 


1 

+15V 

2 

+15V 

3 

GND 

4 

GND 

5 

-15V 

6 

-15V 

7 

unused 

8 

unused 

9 

RTD+ 

10 

RTD- 

11 

Heater+ 

12 

Heater- 
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5.3.1 Filter Card Schematic Diagram 
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5.3.2 Filter Card PCB Artwork 











5.4 CCD Socket Card 

The CCD socket card holds the CCD and the video preamplifiers. 
In addition, it also holds conditioning resistors for the CCD serial and 
parallel clocks and various bypass components for the CCD reference 
voltages. 

The CCD socket card receives the clock and reference signals 
from the filter card through connectors PI, P2, P3, P4, and P5, These 
connectors plug into the connectors J1 through J5 on the filter card 
and therefore have the same pinout as described for them above. 

There are many options available for the configuration of the 
CCD socket card and these are selected using jumpers. The various 
options will be discussed in the following sections as appropriate. 

The CCD socket card is designed to hold the Tektronix M745A 
CCD designed specifically for the STIS project. The CCD is a four port 
device and the camera is designed to support two of those ports 
simultaneously. Because the quality of a particular CCD output port 
cannot be predicted, it was decided to clock the CCD in a 'split 
parallel' configuration and use one output port on each serial 
register. To select which end of a serial register is to be used requires 
the positioning of several jumpers. Jumpers are provided for 
selecting which VSS signal is attached to the preamplifier, and 
jumpers are provided for selecting how the various reference 
voltages, VOD, VRD, and VLG are connected as well as for the reset 
gate and summing well signals. These signals, at each of the four 
ports, may be either connected to the active signal associated with 
that point, or tied to the 'holding' voltage by the placement of the 
jumpers. To allow a particular unused signal to 'float' simply remove 
the jumper altogether. 

The CCD signal may be processed in a number of ways before 
reaching the preamplifier. Jumpers J3 and J6 select whether the CCD 
outputs will see a current source or a simple load resistor, and 
jumpers J2 and J5 determine whether the current source will be set 
by a voltage divider located on the CCD socket card or by the 
programmable voltage provided from the clock card. The simple load 
resistor was found to provide results equal or better to the other 
options at this point. 

The video signal then passes through C26 or C60, to provide AC 
coupling of the signal. Transistors Q6 and Q13 are used to clamp the 
signal to ground during each row shift period. Transistors Q7 and Q14 
are used to buffer the signal at this point, and operational amplifiers 
U3 and U6 serve as the preamplifiers. The gain of these 
preamplifiers is set to 11. 
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The video signals were then to pass through connectors P2 and 
P5, but it was found that they picked up excessive noise through this 
path, and individual wires were connected from the CCD socket card 
to the DB37 connectors on the side of the camera head. 
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5.4.1 CCD Socket Card Schematic Diagram 
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5.4.2 CCD Socket Card PCB Artwork 
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5.5 Tektronix M745A CCD 

The CCD used in the STIS AIS1 camera system is a 2048 row by 
2048 column device designed and fabricated by Tektronix 
specifically for the STIS project. The device is fabricated using three 
phase poly te chni ques in common use for CCD design. The pixel size is 
2 In x 2 In- The serial register extensions contain 20 dummy pixels. 
The output amplifiers are of the 'lightly-doped drain' type. 
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M745A Prohtside 


Pin List 


C amplifier 
c amplifier 
c amplifier 


(h. Package Ground 
2 . M/C 

3. Chip Ground 
/P!^.4._v odc ' 

5. Reset 

6. Last Gate 

7. Serial Phase 3C 

8. Serial Phase 1C 

9. Serial Phase 2C 

10. Serial Phase 2D 

11. Serial Phase ID 

12. Serial Phase 3D 

13. Last Gate 

14. Reset 
V^'ai5. VodD 

16. Chip Ground 

17. H/C 
(f^) M/C 
19. v outD 

d&feft 20, V DDD 
* 21. D amplifier Ground 

22. Summing Well D amplifier 
^ 9- 23- Transfer gate 

24. Parallel Phase 

25. Parallel Phase 

26. Parallel Phase 

27. Patallel Phase 

28. Parallel Phase 

29. Parallel Phase 
T£> 1ST 30 . Transfer Gate 

31. summihg well B amplifier 

32. B amplifier Ground 

^33. Vddb B amplifier 

34 . V oU tg B amplifier 


D 

D 

D 


D 

D 


amplifier 
amplifier 
amplifier . 


amplifier 

amplifier 


3 

1 

2 

2 

1 

3 



M/c (.GHd) 
M/C 

Chip Ground 

v odB, 

Reset 

Last Gate 
Serial Phase 
Serial Phase 
Serial Phase 


Serial Phase 2A 
Serial Phase 1A 
Serial Phase 
Last Gate 
Reset 

v odA 

Chip Ground 
M/c 
M/c 
youtA 
V DDA 


B amplifier 

B amplifier 

B amplifier 

3B 

IB 

2B 


3A 

A amplifier 
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Static Handling Procedures: 

All CCD devices should be stored or 
transported in conductive material so 
that all exposed leads are shorted 
together CCD devices should NOT be 
inserted into conventional plastic 
"snow” or plastic trays of the type used 
for storage and transportation of other 
semiconductor devices. 

All CCD devices should be placed on a 
grounded bench surface and the 
operator should be grounded prior to 
handling the device. This is done most 
effectively by having the operator wear 
a conductive wrist strap. 

Whenever handling a CCD circuit, DO 
NOT WEAR ANY NYLON CLOTHING. 

DO NOT insert or remove CCD devices 
from test sockets with the power 
applied. Check all of the power 
supplies to be used for testing CCD 
devices and be certain that there are 
no voltage transients present. 

When any lead straightening or hand 
soldering is necessary, provide ground 
straps for the apparatus used. 

Cold chambers using C0 2 for cooling 
should be equipped with baffles and 
devices MUST be contained on or in 
conductive material. 


2048 x 2048 Package Configuration (68 Lead Metal Package) 


PIN 41 (welded to package body) 
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Figure 1 


6. VMEbus Interface 


6.1 Overview 

The AIS1 camera is interfaced to the Sun 4/260 workstation 
via custom VMEbus interface cards. Two identical cards are used, one 
for each port of the CCD in use. The VMEbus cards are used for 
communication with the camera controller and to collect the image 
data from the clock/analog modules. The cards are modified versions 
of the Photometries VME200a camera controller. They are provided 
with a custom adapter board designed for this camera system that 
can be used to interface the camera to the workstation via fiber optic 
cables. The VME200a cards and the adapter boards will be discussed 
below. 

6.2 Connector Pinouts 

There are six connectors on the face panel of the VMEbus 
interface cards. At the top is P6 a DB9 style connector used to 
connect the CCD data and data clock lines from the clock/analog 
module to the VMEbus interface. The pinout of this connector is 
shown below. 

VMEbus Adapter P6 Pinout 

1 clock + 

2 clock - 

3 data - 

4 data + 

5 ground 

6 ground for cable shield 

7 unused 

8 unused 

9 unused 


P7 is an 'ST' style fiber optic connector used for the CCD data 
from the clock/analog module and P8 is also an 'ST' style connector 
used for the data clock. 

P9 is an 'ST' type fiber optic connector used for the serial 
communications transmit channel, and P10 is an 'ST' connector used 
for the receive portion of the serial communications. 

jl is a female DB9 type connector used for serial 
communications over wire. The serial communications cable connects 
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to the 'RS422' connector on the controller module. The pinout of the 
J1 connector is shown below. 

VMEbus Adapter J1 Pinout 


1 

transmit+ 

2 

transmit- 

3 

receive+ 

4 

receive- 

5 

unused 

6 

unused 

7 

unused 

8 

unused 

9 

unused 

6.3 VME200a Data Interface Description 


A complete description of the VME200a camera controller card 
from Photometries is beyond the scope of this document. In this 
document, a simple description will be provided with emphasis 
placed on the modifications made to the card to operate the AIS1 
camera system. 

The VME200a camera controller is a VMEbus compatible 
interface card used in conjunction with Photometries series 200 
camera systems. It includes two on board processors, a 68HC11 and a 
DSP56001 (design ideas borrowed fro the development of the AIS1), 
and up to 32 MB of DRAM memory. The memory on the interface 
card is dual ported between the VMEbus and the camera data 
interface. The memory appears as A32/D32 memory to the VMEbus. 
The cards used in the AIS1 system are populated with 8 MB each. 

The 68HC11 processor on the board is used, in this application, 
as a very smart serial communications controller. All communication 
with the camera controller are accomplished through the 68HC11 on 
one of the two interface cards provided. The 68HClls also perform 
various housekeeping tasks on the cards including preparing the 
DRAM array to accept the camera data. On the second card, these are 
the only tasks the 68HC11 performs. 

The DSP56001s have been removed since they were not 

needed in this system. 

The serial data from the camera is converted into parallel form 
on the interface card and stored into memory as it arrives. FIFO 
memory devices assure that data will not be lost during DRAM 
refresh cycles. The 8 MB of memory appear as a single block. Neither 
the on board 68HC11 nor the VMEbus master have any control over 
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where the data will be placed except to reset that location to the base 
address of the card. This is typically done before the camera is 
passed a command that would cause it to produce image data. See 
the 'C' Language Interface section of this document for more details 
concerning the operation of the VMEbus interface card. 


6.4 Fiber Optic Adapter 

To accommodate the fiber optic communications and data 
channels, which are not a standard part of the VME200a, a special 
adapter card was designed. This card, a simple two sided circuit card, 
contains the necessary components to convert the differential TTL 
and RS232 level signals provided and expected by the VME200a into 
the RS422 and optical signals needed to interface to the camera. 

The card bolts into place at the front end of the 6U to 9U 
VMEbus adapter used to install the VME200a in the Sun workstation. 

Complete schematics of the fiber optic adapter card are 
provided in the following section. The circuit board artwork follows. 
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6.4.1 VMEbus Fiber Optic Adapter Schematic 
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6.4.2 VMEbus Fiber Optic Adapter PCB Artwork 
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8. Sun Microsystems 4/260 Workstation 


The Advanced Imaging System CCD based camera includes a 
workstation class computer for data acquisition, analysis, and 
storage. This computer is a Sun Microsystems model 4/260. A 
complete description of this computer is beyond the scope of this 
document. A brief description will be provided in this section to 
familiarize the camera system operator with some of its basic 
features. 

The Sun 4/260 CPU is based on a SPARC type processor and is 
rated at approximately 12.5 million instructions per second. The 
processor is installed in a 12 slot VMEbus compatible chassis. The 
CPU is a two card set occupying the left-most position is the chassis. 

The system includes an eight bit color display with a resolution 
of approximately 1100 x 900 pixels. This display adapter is 
connected to a 19 inch color monitor. 

48 MB of memory are installed in the system to allow it to 
more readily support the 2048 x 2048 pixel images produced by the 
camera system, which occupy 8 MB of memory per frame. 

A 347 MB internal disk drive is included. After the storage 
required for the UNIX operating system and the IRAF image 
processing package, approximately 60 MB of storage remains. 

An external storage module provides another 550 MB of disk 
space and a 650 MB removable read/write optical disk for archival 
storage and data transport. 

A low density tape drive is also included. This tape drive 
supports the DC300 type of media, and provides 60 MB of storage 
per tape. 

The workstation is connected to the camera electronics via two 
VMEbus interface cards installed in the chassis. These interface cards 
are described in greater detail elsewhere in this document. 
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9. System Software Overview 


The AIS1 camera system includes custom software programs 
that run on the various processors in the system. The camera itself 
contains two processors, each of the VMEbus interface cards includes 
one, and the there is the Sun Microsystems workstation itself. Custom 
software has been developed for each of these as a part of this 
project. Each of these programs will be discussed in greater detail in 
the remainder of this document. This section serves as an 
introduction to that information. 

There are four microprocessors embedded in the camera 
electronics. Two of these, a 68HC11 microcontroller (MCU) and a 
DSP56001 digital signal processor (DSP), are contained in the camera 
controller electronics. The camera controller is the digital timing 
generation system, typically mounted in a small chassis bolted to the 
camera head. Also, there is a 68HC11 CPU located on each of the 
VMEbus interface boards. In the STIS AIS1 camera, there are two 
VMEbus interface boards, one for each CCD port read. The processors 
on the two boards execute identical code, but are used somewhat 
differently in the workstation software. 

There are several custom software programs available on the 
Sun Microsystems 4/260 workstation. There is a set of ’C’ language 
control routines that a programmer might use to control the camera, 
or as an example of how one might do so. There is a set of utility 
programs written using the 'C' interface routines, and there is an 
interface to the Image Reduction and Analysis Facility (IRAF) image 
processing software. 

The different portions of the camera system software are 
discussed briefly in the following paragraphs of this section of this 
document and discussed in greater detail in reverse order in the 
following sections. 

9.1 Embedded Software 

The AIS1 camera electronics unit contains two digital 
processors. Each of these has particular functions in the overall 
operation of the camera system, and there is a high level of 
interaction between them. Dedicated software has been developed 
for each processor, and each package will be discussed in turn in this 
section. 

The 68HC11 microcontroller (MCU) performs all communication 
between the host computer and the camera electronics. It does so 
over a 9600 baud RS-422 serial data link. The host computer issues 
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commands to the MCU to set parameters, return status, and perform 
image acquisition functions. The MCU, in turn, commands the 
DSP56001 Digital Signal Processor (DSP) to perform whatever tasks 
are necessary in order to carry out the host's request. 

The DSP generates all CCD clock timing and pixel conversion 
control signals. Functions include clearing the CCD, reading the data 
off the CCD, and a variety of lower level charge shifting and data 
acquisition operations. The DSP is also responsible for setting the CCD 
clock and output amplifier operating point voltages. The DSP 
performs all operations under the control of the MCU. 

These programs are described in some detail in following 
sections of this document. Sections 5 and 6 contain information 
regarding the 68HC11 FORTH program and section 7 contains 
information regarding the DSP program. These more detailed 
descriptions are of interest to those who would like to create 
programs to run on the workstation to control and collect data from 
the camera. It is also of use to those who would like to interface 
directly to the cameras via an ASCII terminal in order to modify, 

maintain, or debug the camera software and hardware. 

The 68HC11 CPUs located on VMEbus interface execute a 
software program developed for use in this application and for use in 
the Advanced Technologies VMEbus interface boards used with other 
Advanced Technologies cameras. This software is discussed in 
general terms in section 8 of this document, and the source is listed 
in section 8a. 

9.2 ‘C’ Language Control Library 

A set of 'C' language routines is provided in the form of two 

source code files: ATDcamera.c and ATDcamera.h. The source code in 

these files serves as a demonstration of how a programmer may 

control the camera and collect image data using the VMEbus 
interface cards. 

These files are discussed in section 4 of this manual and the 
source is listed in section 4a. 

9.3 UNIX utility Programs 

A small set of utility programs is provided for manipulating the 
camera from the UNIX command line. These utility programs were 
written using the C language control library, and serve as practical 
examples to the camera system programmer in addition to their use 
as camera configuration utilities. 

Included are programs to initialize the camera system 
parameters, to send individual command strings to the camera from 
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the UNIX command line, and to send text files containing camera 
commands to the camera. These programs are provided in order to 
assist in supporting some of the programmable features of the 
camera through a simple command line interface which would not 
require programming 

AlSsay is a program that allows the user to transmit any text 
string to the camera through the serial link on the VMEbus interface 
cards. 

AlSsetup is a program that allows the user to set the various 
camera parameters and to download ASCII text files containing CCD 
control voltage settings and CCD timing information to the camera. 

AISfile is a program that allows the user to send any arbitrary 
text file to the camera through the serial interface. These files would 
typically consist of FORTH commands for the camera to execute or 
compile. 

These programs are discussed in greater detail in section 3 of 
this document. 

9.4 IRAF interface 

The camera may be controlled from within the command 
language of the Image Reduction and Analysis Facility (IRAF) 
developed at the National Optical Astronomy Observatories. IRAF is a 
complete data reduction and analysis package used by many 
astronomers. The camera may be controlled and data acquired using 
a set of IRAF commands developed at the Steward Observatory. 

This interface allows the user to perform simple data 
acquisition functions, and allows the user to then manipulate and 
analyze the images acquired using IRAF's various tools. It does not 
directly support the more advanced features of the camera. No 
provision is made for manipulating the CCD control voltages or timing 
from within IRAF, for example, but the command set is complete 
enough for typical operation of the camera in the field. The user 
wishing to simply use the AIS1 camera to acquire image data will 
likely use the IRAF software. Further detail of the IRAF interface 
software is given in the next section of this document. 
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10. IRAF Interface 


The AIS1 camera can be controlled using the Image Processing 
and Reduction Facility (IRAF) developed at the National Optical 
Astronomy Observatories (NOAO) in Tucson, AZ. The camera 
interface software is based on a model provided by Skip Schaller of 
Steward Observatory in Tucson, AZ. Mr. Schaller has developed a 
complete package for interfacing the IRAF command interface to the 
telescope, instrument, and detector in use. The software package is 
called ccdacq. We acknowledge his efforts and appreciate the time he 
has spent assisting in the interface of the AIS1 camera to the IRAF 
package. 

The Sun Microsystems 4/260 workstation included in the 
camera system contains the full IRAF package version 2.9.1. A 
newer version has since become available, but has not yet been 
installed. The system runs under the ‘Sunview’ graphical user 
interface. In the future this will likely change to the ‘Open Look’ or 
‘OSF/Motif interface. 

The Sun workstation runs the SunOS 4.1.1 version of the UNIX 
operating system. The exact configuration of the operating system 
and the various user IDs and other re-configurable portions of the 
operating system will likely change with time. In this document, we 
will describe the system as it was configured in November of 1992, 
and will make an effort to note where the description may change. 

10.1 Starting the Sun 4/260 

If the Sun workstation has been powered down, then it is 
necessary to restart the machine. The computer should reboot 
automatically on power-up, but if it should fail to do so the user will 
see the boot prompt ‘>‘ on the display. The user wishing to reboot the 
machine does so by typing ‘b’ at the boot prompt. If the boot process 
is successful, then the user will see a login prompt. At this point the 
user may login. Various login names are available. The user who does 
not have her own login name but who wishes to use the camera 
system, may login as ‘iraf’ by typing iraf at the login prompt. This 
should bring up the Sunview user interface and start the IRAF ‘cl’ 
command interface. If it does not then type 'sunview' at the new 
prompt. The exact login process and the appropriate login names 
may vary as the system is modified. The ‘iraf’ login was valid when 
the system was delivered. It may be deleted or modified and others 
may be added as time passes. 
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10.2 Running IRAF 

A complete description of the IRAF program is far beyond the 
scope of this document. The user is referred to the IRAF user 
manuals for a complete description. 

After "logging in", the user should type ‘ccdacq’ to enter the 
camera control package and type *?’ to get a listing of the available 
commands. The commands will be briefly described below. The user 
may get a more detailed description of any command by typing ‘help 
task “ where task is the name of the command in question. A 
complete listing of the various help documents is provided at the end 
of this chapter. 

10.3 ccdacq commands 

The ccdacq IRAF package contains sufficient flexibility to allow 
the user to acquire images of a variety of types and to attach 
appropriate header information to them. The basic operation is the 

same as for any other IRAF package in that there are a variety of 
parameters associated with each task. These parameters will be 
discussed in greater detail in later paragraphs. A summary of the 

commands available in the ccdacq package follows. These 

paragraphs are based on the information in the ccdacq help pages 
available from the command line while running IRAF. 

abort Abort an exposure in progress. Close the shutter 

and do not record data. After interrupting the 

observe task, terminate the exposure timer and 
close the shutter. Flush the detector. No data is 
recorded. You may abort with or without having 
first done a pause. 

comps Make a series of imagetype=“comparison” 

exposures. Call observe to make a series of 
comparison observations, turning on the selected 
comparison lamp, and opening the shutter with the 
given time between each chip preparation and chip 
readout. 

darks Make a series of imagetype=“dark” exposures. Calls 
observe to make a series of dark observations, 
each with the given time between chip preparation 
and chip readout. The shutter will not open. 

detector Check the current detector temperature. 
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expose Run an expose cycle on the detector. Use the 
parameters set with the prepare command. Called 
as necessary by the higher level functions. Used 
only for debugging. 

flats Make a series of imagetype=“flat” exposures. Calls 
observe to make a series of flat observations, 
opening the shutter for the current exposure time 
between each chip preparation and chip readout. 


instrument 

The instrument command is not associated with the 
operation of the CCD camera. 

mores Call observe to make a series of observations, 
using the current default parameters. 

observe Make an observation, acquiring data from the CCD. 

Observe connects to the detector, instrument, and 
telescope servers and creates an IRAF image 
containing the data from the detector. All 
appropriate information is entered into the header. 
An exposure of more than ten seconds may be 
suspended by keyboard interrupt (CTRL-C). You 
then may use one of the tasks, pause, resume, stop, 
or abort. Use help to get information on their 
usage. 

pause close the shutter and suspend the exposure timer 

After interrupting the observe task, suspend the 
exposure timer and close the shutter. Useful for 
waiting out passing clouds. May be followed by 
resume, stop, or abort. 

prepare Initialize the camera controller with the latest 
readout parameters. Prepare the interface boards 
to collect CCD data. Called as necessary by the 
higher level functions such as observe. Used only 
for debugging. 


readout Read the data off the CCD. Use the parameters set 
with the prepare command. Is called as necessary 


10-3 



by the higher level commands such as observe. 
Used only for debugging. 

resume Open the shutter and continue the exposure timer. 

Used after interrupting the observe task and 
suspending the exposure timer with pause. 
Continue the exposure timer from the point where 
it was suspended, and reopen the shutter, if it was 
open originally. 

rvshift Run a reverse vertical shift cycle on the detector. 

Use the parameters set with the prepare command. 
Used only for debugging. 

stop Close the shutter and immediately read out the 

chip. After interrupting the observe task and 
suspending the exposure timer with pause, 
prematurely terminate the exposure immediately, 
close the shutter, and readout the chip. Record the 
data. Useful if you originally over-estimated the 
exposure time. You may stop without doing a 
pause first. 

telescope Initiate physical action (if possible) on the telescope 
and report status to STDOUT. Not a part of the CCD 
camera control interface. 

tests Make a series of test exposures. First tries to delete 
an image named test. Then calls observe to make a 
series of test observations, opening the shutter with 
the given time between each chip preparation and 
chip readout. An image named test is left on the 
disk. Does not alter the current rootname or 
sequence parameters. 

zeros Make a series of imagetype=“zero” exposures. Calls 
observe to make a series of zero observations. The 
shutter will not open, and the chip will be readout 
immediately after the prepare cycle, giving an 
exposure time of zero seconds. The zero exposure is 
used to determine the bias level. Sometimes also 
called a bias exposure. 
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detpars Edit the detector parameters, see discussion below 

instrparsEdit the instrument parameters, see discussion 
below 

obspars Edit the observing parameters, see discussion below 
telpars Edit the telescope parameters, see discussion below 


10.4 ccdacq parameters 

As stated above, the action of the tasks in the ccdacq package is 
determined by sets of parameters. These parameters are categorized 
into four groups: detector parameters, instrument parameters, 

observing parameters, and telescope parameters. 

Detector parameters are associated with the CCD itself and the 
portion of the CCD to be read. 

Instrument parameters are not directly associated with the CCD 
camera. They have to do with other parts of the instrumentation in 
use which may be under IRAF control. These might include filters, or 
other optical and electronic components. They will not be discussed 
further in this document. 

Observing parameters have to do with the nature of the next 
observations and the files so created. See the detailed discussion 
below and the on line help for more information. 

Telescope parameters have to do with the position and motion 
of the telescope. They are relevant if the telescope at the sight is 
under IRAF control. They are not discussed in any greater detail in 
this document. See the on line help or any documents specific to your 
telescope for further information. 

The various IRAF parameters are edited using the IRAF 
parameter editing task ‘epar’. Detector parameters may be edited by 

entering the command ‘detpars’ or ‘epar detpars’, instrument 
parameters may be edited by entering ‘instrpars’ or ‘epar instrpars’, 
and so on for the 'obspars' and the 'telpars'. See the IRAF 
documentation for more details on editing IRAF parameters. 

10.4.1 Detector parameters 

The detector parameters have to do primarily with the CCD and 

the image format for the next acquisition. Each will be discussed 

briefly in turn. These descriptions are essentially the same as those 

included in the help file for detpars, with additional notes regarding 
their use with this camera system. 
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firstcol : 


lastcol : 


firstrow 


lastrow : 


colbin : 


The first pixel to be read out of each row in relation 
to the beginning of the serial register. The first 
column on the CCD is considered column 1. If it is 
desired to read a subregion of the CCD device, then 
detcol may be set to a number other than 1. The 
CCD in the STIS AIS1 camera has a total serial 
dimension of 2048 pixels and so firstcol can be 
anything from 1 to 2048. 

The last pixel to be read out of each row in relation 
to the beginning of the serial register. The value of 
this parameter must be greater than the value of 
the firstcol parameter. This value may also range 
from 1 to 2048. 

: The first row that the user wishes to read out of the 
CCDs parallel register. The first row on the CCD is 
considered row 1 . The CCD in the STIS AIS1 camera 
has a parallel dimension of 2048, but the parallel 
register is split and the device is read through two 
ports. Each half of the CCD is clocked simultaneously 
by the camera controller. Subregions of the device 
must be centered around the CCDs parallel split. 
This parameter may range, therefore, from 1 to 
1024. 

This parameter represents the last row to be read 
off the CCDs parallel register. As noted above, the 
parallel register is split and the device is read out 
of two ports, and subregions of the device must be 
centered around the parallel split. Therefore, the 
value of this parameter, though it may range from 
1025 to 2048, must be equal to (2048 - firstrow). If 
it is not, the camera software will abort the next 
observation and issue an error message. 

The column binning factor. Its value may range 
from 1 to 65535. Numbers greater than 2048 will 
not be useful however, as that is the total number 
of columns on the CCD imager. 
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row bin : This parameter represents the row binning factor. 

Its value may range from 1 to 65535. Values 
greater than 1024 will not be useful however, since 
that is the maximum number of rows on each half 
of the CCD imager. 

preflash :The preflash time in milliseconds. At this time the 
STIS AIS1 camera does not support a preflash. 

gain : The gain factor. 

detinfo : The name of a file to be read and copied into the 
header. See the help for detpars for a more 
complete description. 

detcap : The name of the capabilities file, which describes 

the devices which can be selected, their physical 
characteristics, and the protocol used to contact 
their server. This parameter should typically be set 
to “ccdacq$detcap”. 

detname : The device name corresponding to an entry in 

the capabilities file. The detector name for the STIS 
AIS1 camera is “AIS1”. 


10.4.2 Observing parameters 


imagetype : The type of image being recorded. Choose 

among: zero, dark, flat, focus, comparison, standard, 
object. The first two in the list do not open the 
shutter. All others do. 

exposuretime : The exposure integration time in seconds. This 
will be passed to the camera controller through the 
serial interface prior to acquiring the image. 

objecttitle : The title to be given the object. 

Like the camera controller, the ccdacq program 
treats each image acquisition as a sequence of 
acquisitions. Two parameters are associated with 
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this process. The first is the rootname for the files 
which will be generated and the second is the 
number of images in the sequence. The files will be 
given names of the form rootname 1, rootname 2, 
etc. 

rootname : The rootname is the name to be given to the IRAF 
image or images to be recorded onto disk. 

sequence : If sequence is not INDEF, this sequence number 
will be appended to the rootname to form the 
image name. This parameter will be incremented 
by one at the end of the task. This IRAF parameter 
is not to be confused with the camera parameter 
NUM_IMAGES. When using the camera with IRAF, 
NUM_IMAGES should be set to 1. This is typically 
its default value. The ccdacq program will handle 
each image acquisition in the sequence when the 
camera is used with IRAF. 


When focusing the telescope, the ccdacq package acquires a 
series of exposures of the same object in a single CCD frame in order 
to allow the user to more easily evaluate the variations in focus 
quality without waiting for the CCD to be read between each 
acquisition and without comparing multiple files. Three parameters 
are associated with this feature. One, determines the number of 
images to be acquired before reading the images off the CCD, the next 
selects between moving the telescope or reverse shifting the image 
across the CCD between exposures, and the last determines the 
number of rows to reverse shift between images if reverse shifting is 
selected. At this time the AIS1 does not support reverse shifting. 
This is not a limitation of the camera controller, but has not been 
coded into the IRAF interface software. At a future date it will be. 

nfexpo : This is the number of exposures to take before 
reading out. In this case, the exposure time is the 
time for each individual focus exposure. This 
parameter is used only if image type is focus. 

shtype : Two options exist for acquiring the focus images. The 

image. If the shift type is “detector”, move the 
image on the detector between focus exposures by 
reverse shifting the chip. If the shift type is 
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“telescope”, move the image by moving the 
telescope. This parameter is used only if imagetype 
is focus. As noted above, at this time the AIS1 does 
not support reverse shifting of the image on the CCD 
and the shtype should be set to “telescope”. 

nrvrows : This is the number of rows to reverse vertical shift 
between focus exposures. This parameter is used 
only if imagetype is focus. 

Three other parameters are associated with the focus 
acquisitions. They are described in turn below. 

foctype : If the focus type is “telescope”, move the telescope 
focus between focus exposures. If the focus type is 
"instrument", move the instrument focus. This 
parameter is used only if imagetype is focus. 

fstart : This is the starting focus value in a series of focus 

exposures. It may be any value acceptable to 
instrpars.instrfocus or telpars.telfocus. This 
parameter is used only if imagetype is focus. 

fdelta : If non-zero, fstart is taken as a numeric value, and 

fdelta is added to it after each focus exposure, to 
use as the next focus value. If zero, this parameter 
has no effect. This parameter is used only if 
imagetype is focus. 

pixtype : The data type of the IRAF image to be recorded on 
disk. Choose among: b, c, u, s, i, 1, r, d, x. These 
correspond to unsigned byte, an IRAF char, 
unsigned short integer, short integer, integer, long 
integer, single real, double real, complex, 
respectively. 

observers : The names of the observers to be entered into the 
image header. 

comments : Any comment you wish to be recorded into the 
image header. One line only. 
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comfile : The name of a file containing comments to be 
written into the header. Each line of this file is 
automatically formatted into a FITS COMMENT 
record. You should not include the COMMENT 
keyword in this file. Since this file is read at the 
beginning of the readout, you may edit this file 
anytime during the exposure. 

obsinfo : The name of a file to be read and copied into the 
header. 

command : Any IRAF task you wish to be executed at the end 
of the observe task. The first %s in the string is 
replaced by the image name just recorded. Could 
be used for post-processing, taping, or just 
displaying. 

verbose : Output to STDOUT, messages containing the name of 
the IRAF image and other information as to what is 
currently happening. Set to either ‘no’ or ‘yes’. 

debug : Output to STDERR, debugging information concerning 
the operation of this task. Set to either ‘no’ or ‘yes’. 
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11. UNIX Utility Programs 


A small set of utility programs are provided for facilitating the 
use of the camera while its connected to the Sun workstation. These 
programs may be called from the UNIX command line to 
communicate with the camera, set parameters, change voltage and 
timing information, and to operate the camera. No functions are 
provided for collecting the data from the camera. These programs are 
meant primarily for use in camera setup and functional testing of the 
camera electronics. The programs were written using the functions in 
the 'C' language interface described in the next section of this 
document. 


11.1 AlSsay 

The AlSsay program is used to issue a single line string of 
ASCII text to the camera. The text string passed may contain one or 
more camera commands. The string could define a new camera 
command. See section 7 of this manual for details on creating new 
camera commands. Most often, this program will be used to set a 
camera parameter or adjust a camera voltage during test. This 
program may be called from within the IRAF environment. 

The string is passed on the command line as in : 

AlSsay "OPEN CLOSE READ" 

which would cause the camera controller to open the shutter, close 
the shutter, and read the data off the CCD. 


11.2 AISfile 

The AISfile program is used to pass an ASCII text file to the 
camera controller through the serial interface on the VMEbus 
interface cards. This file may contain any valid camera commands 
and may include new camera command definitions. This program 
might commonly be used to set the camera voltages and timing 
tables to those values stored in a text file. Different text files could be 
maintained for different CCDs or for different applications. This is a 
maintenance operation that will not likely be of use to the average 
operator. If desired, the entire camera software package can be 
replaced or modified through the use of this utility. 


11.3 AlSsetup 

The AlSsetup program is a simple menu driven program used 
to set camera parameters and to download files containing voltage 
and timng information. The program prompts the user for the 
desired activity and then either opens a file from transmission using 
an AISfile - like function, or prompts the user for parameter values 
and issues text strings to the camera to set those parameters in much 
the same way that the AlSsay program does. 
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12. 'C' Language Control Library 


A set of 'C language routines is provided to allow programs to 
be developed which control and collect data from the camera. These 
routines directly support the most commonly used functions in the 
camera controller's command set. Other camera functions are 
indirectly supported via a set of commands used for sending ASCII 
text strings to the camera through the VMEbus interface. 

The 'C' language camera interface consists of a set of routines 
which may be used in a custom camera control program to operate 
the camera. The functions may be broken down into four groups. The 
first of these consistes of routines that perform some action on the 
VMEbus interface card itself, without commanding the camera to do 
anything. The second set consists of high level functions that cause 
the VMEbus interface card to issue a command string to the camera 
controller CPU and wait for a response. The third consists of a set of 
functions used by those who would like to construct their own 
command strings and send them to the camera controller. The fourth 
set consists of low level functions that are called by the functions in 
each of the three other sets. These deal primarily with the 
handshaking between the Sun workstation and the CPU on the 
interface card. 

12.1 Function Reference 

The following sub-sections of this document discuss the various 
functions contained in the ’C' language function set. Each sub-section 
describes one of the sets of functions mentioned above. They are 
discussed in the following order: Interface Commands, High Level 
Commands, Communications Functions, and Low Level Commands. 

One VMEbus interface card is used for each port read off the 
CCD. The STIS AIS1 camera uses two CCD ports and therefore, two 
VMEbus interface cards. The funcitons in the Interface Command set 
will likely be called at some point on both interface cards. They 
accept as their first parameter the base address of the interface card 
to be affected cast as a a character pointer. 


12.1.1 Interface Functions 

The interface commands are commands which operate not on 
the camera, but on the VMEbus interface card itself. They include 
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functions to reset an interface card, to reset an image capture 
address counter, to initialize the serial to parallel converter, to and to 
read and write the bits of the "user I/O" port onthe interface card, 
which is as yet unused in this camera system. 

The first two fuctions are used to reset the Interface card, or to 
halt the microntroller on the interface card. The first of these might 
be called at the start of a program, the second is used on for 
debugging purposes normally. 


reset (controller) 

reset one of the VME interface boards 
char *controller : address of board to reset 

halt (controller) 

halt the microcontroller on the VMEbus interface 
char *controller : address of board to halt 


Where the camera data is captured in the cards memory is 
determined by a counter on the card which may be reset to zero 
using the function agjnit described below. Typically, this function 
will be called before each image acquisition. If it is not called, then 
the next image will be collected into the succeeding memory 
locations. This feature may be used to allow the collection of a series 
of images into the VMEbus memory before moving the data off the 
card. 


ag_init (controller) 

reset the "address generator" PLD on one of the VMEbus interface cards 
char *controller : address of board on which to reset the address 


The VMEbus interface cards recieve the camera data in a serial 
format and convert that to a parallel form on the card. A 
programmable logic device controls the conversion. 

spcon_init (controller) 

initilize the serial to parallel converter on one of the VMEbus interface 
cards. 

char *controller : address of board on which to operate 
spcon_reset (controller) 

reset the serial to parallel converter on one of the VMEbus interface cards 
char *controller : address of board on which to operate 
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The interface cards contain an eight bit "user I/O" port which 
may be read or written using the following routines. This port could 
be used as a trigger to external equioment, to control mechanical 
devices such as filter wheels, etc. As of 12/92, they are not used for 
any purpose inthe STIS AIS1 camera system. 

io_read (controller) 

read the TTL data present on the user I/O port of one of the interface card 
char controller : address of board on which to read the I/O port 
returns : char the data read on the input pins 

io_write (controller, value) 

write to the output bits of the user I/O port on one of the interface cards 
char ^controller : address of board on which to write the user I/O port 
char value : the vaue to write 


12.1.2 High Level Functions 

The high level commands are use to initaite action by the 
camera controller electronics. They are generally commands that 
cause the VMEbus onterface card to issue an ASCII text string to the 
camera and wait for a reply. The cameras response is captured as an 
ascii text string in the "text input buffer" on the interface card. The 
user's programs may read this buffer if it is desired tomonitor the 
earner's responses. Many of the commands will also cause the camera 
to produce image data. This data will be captured by the interface 
card into the image buffer at the place pointed to by the address 
counter. Most of the commands here call the ag_init() function to 
reset the adress pointer before issuing the camera commands. 


cam_restart (controller) 

Issues a series of command strings to the camera controller which cause it 
to perform a restart. 

char *controller : address of board to use for communication 

set_param (controller, offset,value) 

Set a camera parameter. 

char ^controller : address of board to use for communication 
unsigned short offset : the parameter's parameter table offset 
unsigned short value : the new value for the parameter 

get_format (controller) 

get a list of the current settings of the system parameters, 
char controller : address of board to use for communication 

set_format (controller) 

initialize the sequencer with the current format params. 
char controller : address of board to use for communication 
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set_exposure_time(controiler, exptime) 

char *controller: address of board to use for communication 


cam_write (controller, address, datum ) 

write a value to a sequencer address, 
char *controller : address of board to use for communication 
unsigned short address : the address to write to 
unsigned short datum : the datum to write 


The camera may perform a continuous clear operation between 
exposures to eliminate dark current. The camera may perform clock 
recombination anti blooming during integrations to prevent image 
degradation due to overexposed areas. The following functions are 
used to select or deselect these features. 


cisc_on (controller) 

Turn on continuous clearing of the CCD between image acquisitions, 
char *controller : address of the board to use for communication 

cisc_off (controller) 

Turn off continuous clearing of the CCD between image acquisitions, 
char *controller : address of board to use for communication 

anti_bloom_on (controller) 

enable clock recombination anti-blooming 

char ^controller : address of board to use for communication 

anti_bloom_off (controller) 

disable clock recombination anti-blooming 

char *controller : address of board to use for communication 


The AIS1 camera uses a dual slope integrator based analog to 
digital conversion scheme on the CCD data. The length of time that 
the integrator integrates each pixel detertmines the pixel throughput 
rate as well as the gain of the electronics. This is why these three 
gain control functions also affect the camera readout speed. The exact 
sensitivity of the system will depend on a variety of factors including 
the CCD output FET operating point voltages. This is why these 
functions make no reference to an actual gain figure. The cameras 
gain fetor should be measured for an accurate figure. 

AIS_gain_lo (controller) 

Sets the conversion rate to 40 kpix/sec. 

char ^controller : address of board to use for communication 

AIS_gain_mid (controller) 
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Sets the conversion rate to 20 kpix/sec. 

char "“controller : address of board to use for communication 

AIS_gain_hi (controller) 

Sets the conversion rate to 10 kpix/sec. 

char "“controller : address of board to use for communication 


The CCD temperature is regulated. A program may set and 
mobitor the CCD temperature via the following two functions. 

CCD_temp (controller) 

query the temperature of the CCD. 

char "“controller : address of board to use for communication 

set_temp (controller, value) 

set the desired operating temperature for the CCD. 

char "“controller : address of board to use for communication 

char value : desired temperature 


Two functions are provided to control the camera's shutter. 
Normally, one of the higher level image acquisition commands such 
as obs(), described below, will be called and the camera controller 
will take care of the shutter control during the acquisition. These 
functions are used by the programmer who wishes to control the 
camera operation at a slightly lower level. 

oshut (controller) 

Open the shutter on the camera. 

char "“controller : address of board to use for communication 

cshut (controller) 

Close the shutter on the camera. 

char "“controller: address of board to use for communication 


A set of low level charge shifting and pixel conversion 
commands are provided. These include functions to read or discard 
groups of CCD pixel and columns. Using these routine, the 
programmer may build custom readout sequences. 

pix_bin (controller, npix) 

Bin a number of pixels into the CCD summing well, 
char "“controller: address of board to use for communication 
unsigned short npix : the number of pixels to bin 

row_bin (controller,nrows) 

bin a number of rows into the CCD serial register. One 
char "“controller: address of board to use for communication 
unsigned short nrows : the number of rows to bin 
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pix_discard (controller,npix) 

discard a number of pixels in the CCD serial register, 
char ““controller: address of board to use for communication 
unsigned short npix : the number of pixels to discard 

row_discard (controller,nrows) 

discard a number of rows in the CCD parallel register, 
char ““controller: address of board to use for communication 
unsigned short nrows : the number of rows to discard 

pix_read (controller,npix) 

read a number of pixels in the CCD serial register. 

char ““controller: address of board to use for communication 

unsigned short npix : the number of pixels to read 

row_read (controller, nrows) 

read a number of rows in the CCD parallel register, 
char ““controller: address of board to use for communication 
unsigned short nrows : the number of rows to read 


Four functions are provided for clearing the CCD, integrating 
charge, and reading the CCD image data. They maybe used by the 
programmer to control the CCD image acquisition ata moderately high 
level. Most often the commands in the following section will be used 
to allow the camera controller to handle more of the details of image 
acquisition. 

clear (controller) 

clear all charge off the CCD. 

char controller : address of board to use for communication 

integrate_dark (controller) 

integrate dark current on the CCD device. 

char controller : address of board to use for communication 

integrate_light (controller) 

integrate light on the CCD device. 

char ““controller : address of board to use for communication 

readout (controller) 

read the image off the CCD based on the current 

char controller : address of board to use for communication 

Four functions are provided for acquiring images from the 
camera in a totally self contained fashion. Using these commands 
allows the programmer the easiest method of image acquisition. The 
camera controller takes care of the CCD clearing and exposure as well 
as reading the data off the CCD using the current format parameters. 
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bias (controller) 

generate in image of the CCD with no charge on it. 

char *controller : address of board to use for communication 

expose (controller,exptime) 

this function is redundant to the OBS command below, 
char "“controller : address of board to use for communication 
unsigned long exptime : exposure time, in milliseconds 

dark (controller,exptime) 

this function is called to generate an image of the CCD 
with dark current. 

char *controller : address of board to use for communication 
unsigned long exptime : exposure time, in milliseconds 

obs (controller,exptime) 

this command generate an object exposure 

char *controller : address of board to use for communication 

unsigned long exptime : exposure time, in milliseconds 


12.1.3 Communications Functions 

These functions are used to send and receive text from the 
camera. They are use when the 'built-in' commands do not include a 
command that the programmer would like executed. Normally 
send_string() is used for this purpose. See the C' source code for 
more information. 

send_file (controller,filename) 

send an ASCII text file to the camera. 

char ^controller : address of board to use for communication 

char "“filename : name of the file to send 

send_string (controller, theString) 

send an arbitrary string to the camera. 

char "“controller : address of board to use for communication 

char + theString : the string to send 

wait_OK (controller) 

wait until an 'OK' response has been received from the camera 
char "'controller: address of board to use for communication 

wait_CR_LF (controller) 

wait until an carriage return line feed pair has been recieved from the 
camera 

char "‘controller: address of board to use for communication 

flush_buffer (controller) 

char "‘controller : address of board on which to flush the text input buffer 
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read_cam_buffer (controller) 

char *controller : address of board read the text from 
fetch all the characters in the serial input bufer. 

send_cam_char (controller, achar) 

char ^controller : the address of the board to send char through 
char achar : the character to send 

get_a_char (controller) 

char *controller: address of board to fetch the character from 
fetch a character from the serial input buffer. 
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13. Programmable CCD Clock Timing 


The AIS1 camera generates the CCD clock timing, that is all 
sequences of parallel and serial clock edges, and analog processor 
control signals, with a set of state tables. In doing so, the nature of 
these sequences may be controlled by placing appropriate 
information into the tables. Software tools are provided at various 
levels to allow the user to do so. 

13.1 Timing Tables 

The camera timing is determined by the variables stored in the 
following state tables, two tables are provided for each sequence, 
these include the actual states; i.e. the values to be written into the 
latches on the clock cards; and a set of "waits" that determine how 
long the sequencer should pause between states, four sequences are 
stored ; 

Parallel Clock Sequence 

Serial Clock Sequence 

Analog Processing Control Sequence 

Clock Recombination Anti-Blooming Sequence 

13.1.1 Parallel Clock Timing 

The sequence of the CCD parallel clocks is determined by the 
entries in the parallel clocking state tables. There are two, one for 
one half of the CCD and the other for the other half. The two halves of 
the CCD are clocked toward their respective output ports normally, 
but may be reversed for full frame readout through either port by 
changing the entries in the tables or by setting the parallel clocking 
direction parameters appropriately. 

The parallel clock timing tables are 32 entries long. Normally, a 
CCD clocking sequence can be achieved in 6 or 8 entries. A variable is 
available for setting the number of states that are actually in use. 
This variable N_PAR_STATES is referred to by the sequencer, and 
that number of states are read from the table and written to the 
latch on the clock card that controls the parallel clocks. 

The tables contain 9 bit values. Two bits each are used to 
control the four parallel clock phases provided. And one bit controls 
the transfer gate. Two bits are required to control the parallel clocks 
because tri-level clocking capability is provided. 

The FORTH code refers to the parallel clocking tables as 
CAMO_PAR_STATE and CAM1_PAR_STATE. The entries are accessed 
by preceding the table name with the desired index. For example, 
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12 CAMO_PAR_STATE @ 

will fetch the value of the 12th element in the table named 
CAMO_PAR_STATE. 

Appropriate table entries maybe generated by ’OR-ing’ 
together the following FORTH constants. 


00 

CONSTANT 

Pl_LO 

01 

CONSTANT 

P1_MID 

02 

CONSTANT 

Pl_HI 

00 

CONSTANT 

P2_LO 

04 

CONSTANT 

P2_MID 

08 

CONSTANT 

P2_HI 

00 

CONSTANT 

P3_LO 

10 

CONSTANT 

P3_MID 

20 

CONSTANT 

P3_HI 

00 

CONSTANT 

P4_LO 

40 

CONSTANT 

P4_MID 

80 

CONSTANT 

P4_HI 

0 

CONSTANT 

TG_LO 

100 

CONSTANT 

TG_HI 

The FORTH word ' 1 ' is used to perform a bitwise 'OR' operation 
on two numbers. 


For example, the FORTH command string, 

Pl_LO P2_HI I P3_LO I P4_LO I TG_LO I 3 CAMO_PAR_STATE ! 

will install into position 3 in the paralel clock table associated with 
CAMO a state with only parallel clock phase 2 held high. The actual 
voltage produced for each clock in each of its states is determined by 
the settings of the CCD clock rail DACs described in greater detail in 
section 7 of this document. 

When moving charge in the parallel direction on the CCD, the 
camera controller steps through the tables reading the value found at 
each location and writing that value to the parallel clock control latch 
on the clock card. If the user value of the CAMOJPDIR or CAM1_PDIR 
parameter is 0, then the sequemcer starts reading the table at 
location zero and steps forwards. If one or both of them have a value 
of 1, then that sequence is read backwards, with the first location 
being determined by referring to the appropriate table length 
parameter. 

The camera controller pauses between each step in the table. 
The amount of time that it will pause is determined by the values 
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stored in another table. The table is reeferred to as PAR_DELAY and 
its elements may be accessed in the same way as the state tables. 
The table contains numbers which representthe number of 100ns 
'NOP' instructions the sequencer should execute before writing the 
next state to the latch. A different delay may therefore be associated 
with each state inthe table. Normally it is not necessary to adjust the 
delays individually, and a single value may be desired for all the 
delays. The function SET-PAR_DELAYS may be used to set all the 
entries in the table to the same value. 

To display the contents of the parallel state tables, one may 
execute the FORTH function SHOW_PAR_S TATES, which will produce 
a formatted ASCII text stream listing the states in the table. 

13.1.2 Serial Clock Timing 

The sequence of the CCD serial clocks is determined by the 

entries in the serial clocking state table. The two halves of the CCD 
are clocked simultaneously using the values in the single table. This 
done to assure that the serial clocks run with a minimum of 
overhead time wasted. No delays are executed by the sequencer 
when writing the serial clock states to the serial control latches on 
the clock cards. 

The serial clock timing tables are 32 entries long. Normally, a 
CCD clocking sequence can be achieved in 6 or 8 entries. A variable is 
available for setting the number of states that are actually in use. 
This variable N_SER_STATES is referred to by the sequencer, and 
only that many states are read from the table and written to the 

latch. 

The tables contain 8 bit values. Two bits each are used to 
control the four serial clock phases provided. Two bits are required 
to control the parallel clocks because tri-level clocking capablity is 
provided. 

The FORTH code refers to the serial clocking table as 

SER_STATE. The entries are accessed by preceeding the table name 
with the desired index as was shown for the parallel clocking tabless 
above 

As for the parallel clocks, appropriate table entries maybe 
generated by 'OR-ing' together the following predefined FORTH 

constants. 

00 CONSTANT Sl_LO 

01 CONSTANT S1_MID 

02 CONSTANT Sl_HI 

00 CONSTANT S2_LO 

04 CONSTANT S2_MID 
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08 CONSTANT S2_HI 
00 CONSTANT S3_LO 
10 CONSTANT S3_MID 
20 CONSTANT S3_HI 
00 CONSTANT S4_LO 
40 CONSTANT S4_MID 
80 CONSTANT S4_HI 

No provision is made for running the serial clocks backwards 
except by changing the sequemce of states in the table. 

13.1.3 Analog Processor Control 

The analog processor state table is a little different than the 
parallel or serial state tables. The analog state table determines the 
equence in wjhich the various parts of the analog signal procsessing 
chain are switched. The analog processor is constructed in the form 
of a dual slope integrator. There are a very limited number of ways 
in which this state table may be effectively configured. The primary 
reason for providing the programmable timing approach for the 
analog procesor is so that entriely different analog procesing schemes 
could be supported by modifying the harware in the system, while 
not requireing a change in the software. As long as the analog 
processing chain is configured as it was delivered, the states in the 
table will retain essentially the same sequence. 

The table is supported in the same way as the parallel and 
serial timing tables. The table is referrred to as ANA_STATE, and the 
individual elements are referred to by index in the same way. 

Of more interest to the programmer is the table of delays 
between analog processing states. The delays during which the 
integration takes place are the most important. These two should be 
the same and will determine the gain of the integrator and therefore 
of the system. The time during which the integrator is reset should 
be long enough to assure that the integrating capacitor is fully reset. 
A minimum length of 6 usee is recommended. For precise adjustment 
of the analog processor timing it is recommended that the waveforms 
be examined on an oscilliscope, and the number in the table adjusted 
until the appropriate timing is acheived. 

The analog procesor timing is not something that the user will 
ordinarily need to modify, and there are convienient functions 
available in the FORTH program to setthe integrator values to achieve 
particular camera operating speeds. 

The length of the analog processor control table is fixed at 14. 
There is a fixed pattern with which they are executed and anyone 
modifying the table entries must be aware of this. The first two 
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states are written before the CCD reset pulse goes high and then low 
again. Then the next two are written. After that state pair, the serial 
clocks run, shifting the pixels to be read into the summing well. The 
next five states are then written. Then the summing well signal is 
pulsed low and then high, pushing the pixel charge into the output of 
the CCD. Then five more states are output. The sequence then starts 
over for anymore pixels to be converted. 

The FOTH function SHOW-ANA_STATES can be called to 
examine the contnets of the analog control state table. 

Entries for the table can be generated by OR-ing together the 
following FORTH constants. 


1 

CONSTANT 

RIN 

( integrator reset 

0 

CONSTANT 

! RIN 


2 

CONSTANT 

DCR 

( D.C. restore 

0 

CONSTANT 

! OCR 


4 

CONSTANT 

SA2 

( sample period 2 

0 

CONSTANT 

! SA2 


8 

CONSTANT 

SAl 

( sample period 1 

0 

CONSTANT 

! SAl 


10 

CONSTANT 

CTC 

( command to convert 

0 

CONSTANT 

! CTC 


20 

CONSTANT 

SEN 

( send data trigger 

0 

CONSTANT 

! SEN 


40 

CONSTANT 

16B 

( use slow speed 16 bit 

0 

CONSTANT 

! 16B 



13.1.4 ClockRecombination Anti-Blooming 

The AIS1 camera is capable of performing clock recombination 
anti blooming during image integrations. This anti-bloming is 
accomplished by switching the parallel clocks while integrating 
charge. The sequence in which they are clocked to accomplish this is 
stored in a table named AB_STATE and is indexed in the same way 
as the other tables discussed in this document. There is also an 
AB_DELAY table asociated with this clocking. It operates the same as 
the delay table associated with the parallel clocks. 

The FORTH function SHOW-AB_STATES may be used to 
generate a list of the states currently stored in the table. 

The same FORTH constants as are OR-ed to create the parallel 
state table may be used to create the AB_STATE table. 

13.2 Filling the Timing Tables 

The timing tables do not often need to be modified. They will 
need modification whe a different type of CCD is installed or if the 
analog processor is modified greatly. If the user wishes to 
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experiment with CCD clocking schemes to optimize the operation of 
the CCD then they will need to know how to fill the tables. 

A simple terminal may be connected to the camera controller 
and used to update the tables stored in the controllers EEPROM. 

The easiest way to fill a particular entry in a timing table is to 
use the AlSsay utility. This utility described elsewhere in this 
document may ne used to transmit a one line text command to the 
camera controller through the VMEbus interface card. For example, 
typing 

AlSsay "P1_L0 P2_HI I P3_LO I P4_LO I TG_HI I 6 CAM1_PAR_STATE ! " 

at the UNIX command line, will install into position 6 in the parallel 
clock table associated with CAM1 a state with parallel clock phase 2 
and the transfer gate held high. 

Typically, the contents of an entire table will need to be 
modified at once. This is most conveniently done using the AISfile 
utility, also described elsewhere in this document. In this way a 
simple ASCII text file may be maintained and sent to the camera at 
once. 

The AlSsetup utility also offers the option of sending a text 
file to the camera for this purpose. It uses a default filename of 
"AlStiming", and is primarily intended to allow the user to put the 
states back in their original configuration easily. If the "AlStiming" 
file has been modified, then it could contain anything. 
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13.3 Timing Table Example 



AtStiming 


Mon, Sep 21, 1902 4:07 PM 


1 


DECIMAL 

ic n_?ar_sta?es ! 



PI 

_MID 

P2_LO 

OR 

P3_LO 

OR 

P4_LO 

OR 

TG_LG 

OR 

0 

PI 

MID 

P2„LO 

OR 

P3_HI 

OR 

P4_LO 

OR 

TG_HI 

OR 

1 

PI 


?2_LG 

OR 

P3_HI 

OR 

P4 LO 

OR 

TG_HI 

OR 

2 

PI 

_LG 

P2_MID 

OR 

P3_HI 

OR 

P4_LO 

OR 

TG_HI 

OR 

3 

PI 

LO 

P2_MID 

OR 

P3_LO 

OR 

P4_LO 

OR 

TG_LO 

OR 

4 

PI 

~ MID 

?2 MID 

OR 

P3_LO 

OR 

P4_LO 

OR 

TG_LO 

OR 

c 

PI 

_MID 

P2_LO 

OR 

P3_LO 

OR 

P4_LO 

OR 

TG_LO 

OR 

6 

PI 

_MID 

P2_LO 

OR 

P3_LO 

OR 

P4_LO 
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14. Programmable CCD Voltages 

The AIS1 camera allows the user or a control program to manipulate 
the CCD clock voltages through software. All the CCD voltages may be 
adjusted over a wide range. This allows the voltages to be quickly and 
predicably varied to either test the operational parameters of a specific 
CCD device, or to optimize the camera's setup for a particular CCD with 
known parameters. Since the STIS AIS1 camera is a dual port system, 
separate voltage adjustments for either portion of the CCD are available 
where appropriate. Exceptions are noted below. In the development of the 
system, certain decisions were made regarding which voltages should be 
programmed and which need not be. These judgements are also discussed 
below. 

14.1 CCD Clock Rails and DC potentials 

The CCD clocks are adjusted by a set of eight bit voltage output 
digital to analog converters (DACs) located on the clock card. The DAC 
outputs range from 0.0 volts to 5.0 volts, approximately. These voltages 

are the scaled to the range appropriate for the particular clock rail in 
question. In order to maintain flexibility in the system, most of the 
voltages may be adjusted over the range of -12.5 volts to +12.5 volts.. 

14.1.1 CCD Parallel Clocks 

The CCD parallel clocks are adjusted by the setting of three DACs. 
Three voltages are provided in order to support either virtual phase 

devices (which are becoming increasingly rare) or to optimize the pixel 
capacity of devices operated inthe MPP mode. The three available voltages 
and their ranges are shown below. 

parallel clock low -12.5/+12.5 

parallel clock midrange -12. 5 /+ 12. 5 

parallel clock high -1 2.5/+ 12.5 

In the STIS camera, the Tektronix M745A CCD is typically operated 
inthe MPP mode and clock phases 1 and 2 are switched between low and 
midrange while phase 3, under which the MPP implant resides, is switched 
from low to high. In this way the upper rail of phase 3 may be 
independently controlled to optimize the CCD’s "full well capacity". The 
actual clocking of the various phases depends on the CCD timing 

information, which is also programmable and discussed elsewhere. 

Separate clock voltages for the parallel to serial transfer gate are provided 
and thier ranges are shown below. 
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transfer gate low 
transfer gate high 


- 1 2.5/+ 12.5 
- 1 2.5/+ 12.5 


Tri-level clocking is not implemented on the transfer gate. It is not deemed 
neccessary. 

14.1.2 CCD Serial Clocks and Suming Well 

The CCD serial clocks also support tri-level clocking, but here it is 
primarily for use with virtual phase devices, since MPP mode is not 
usually an option on the serial register. The available voltages and their 
ranges are shown below. 

serial clock low -12.5/+12.5 

serial clock midrange -12.5/+12.5 

serial clock high -12.5/+12.5 

Separate voltages are available for the summing well, although in 
most cases it is clocked at the same potentials as the serial register. Tri- 
level clocking is not supported on this gate. These voltages and their 
ranges are shown below. 

summing well low -12.5/+12.5 

summing well high -1 2.5/+ 12.5 

14.1.3 CCD Reset Gate and Last Gate 

The CCD reset gate is supported with a pair of voltages for high and 
low. The switch which actually clocks the CCD reset gate is located in the 
camera head for maximum imunity to noise and potentially damaging 
votage spikes. The CCD reset gate is a very sensitive point on the device 
and very susceptible to noise pickup. A programmable voltage for the 

lower rail of the reset gate is provided on the clock card and fed into the 

camera head, but it was found that for optimum noise performance, it was 
best to tie this potential to a very clean ground. Therefore, adjusting the 
reset gate low voltage has no affect whatsoever on the system. 

reset gate low 0.0/+15.0 

reset gate high 0.0/+15.0 

The CCD serial register is terminated by a single gate that acts as a 
barrier between the summing well and the output. This gate is known by a 
variety of names such as "serial transfer gate", "output gate", and "last 
gate". In the hardware and software of the AIS1 camera, this gate is 
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named the "last gate" and is adjutable over a reduced range. Whereas the 
serial and parallel clocks may be adjusted from -12.5V to +12.5 volts, the 
last gate may be adjusted from -5.0V to +5.0V. This design decision was 
made for two reasons. The first is that it was not thought that the last gate 
would require potentials outside of this range, and the second was to allow 
a finer adjustment of the potential with only 0.04V change per DAC unit. 
The last gate potential range is shown below. 

last gate -5.0/+5.0 


14.1.4 CCD Output FET Potentials 

Two DC potentials that can have a very dramatic effect on the 

operation of the CCD output amplifier are the reset FET and output FET 
drain voltages. They determine the "operating point" of the amplifier and 
have a very great effect on gain and linearity of the amplifier. These two 
voltages need to be raised to greater potentials than the other signals in 
the system and are therefore generated a little differently. The voltage out 
of the DAC is buffered by an operational amplfier operating off a single 
sided supply of approx. +28 VDC. The design of the circuit allows the 
voltages to be raised to +20 and +25 V respectively. This allows the 

operation of all CCDs in widespread use today including those with "lightly 
doped drain" output amplifiers. The STIS 2048 CCD is such a device. 

Separate reset drain (VRD) and output drain (VOD) voltages are 

provided for the two amplifiers on the CCD, but experience shows that 
there should be little or no potential between the various VRD voltages 
used on a single CCD. For this reason, although both clock cards have the 
circuitry necessary for producing the VRD signal and the software refers to 
VRD potentials for both amplifiers, only one voltage is actually applied to 
both amplifiers. It is the VRD signal produced on the clock card for 
amplifier 1 which is used. Adjusting this voltage will affect the operation 
of both amplifiers, while adjusting the other will have no effect on the 

system. The signal names and their ranges are shown below. 

CCD reset drain (VRD) +5.0/+20.0 

CCD output drain (VOD) +5.0/+25.0 


14.1.5 Other Clocks and Potentials 

The AIS1 socket card provides a variety of options, one of which is 
the use of a "clamp" circuit which discharges the AC coupling capacitor 
used in the very first stage of amplification off the CCD. The use of this 
circuit is selected by installation of the appropriate components into the 
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circuit board. The camera was built to include this circuit since it has been 

proven to be effective. As this option was not originally planned for, there 

was no signal provided to operate the FET switch which is used to connect 
the capactitor to ground. Therefore, one of the extra clock switches 
provided on the clock card was used to toggle the switch which requires a 
signal that swings from somewhat less than -10.0 volts to 0 volts, with the 

higher voltage closing the switch. The voltages for this switch do not need 

to be adjusted and in doing so incorrectly (i.e. >0.6 volts) can result in 
damage to the FET. For this reason, the rails were hard wired to -15.0 V 
and ground. Therefore, although extra switch 1 is used for this circuit, the 
programmable voltages associated with it are not, and adjusting them has 
no affect on the camera. In some other configuration, these voltages may 
be used for some other purpose, and are therefore listed below along with 
their ranges. 

( clamp signal ) 

extra clock 2 high -12.5/+12.5 (unused) 

extra clock 2 low -12.5/+12.5 (unused) 

Another option provided by the AIS1 socket card is the selection of 
either a simple load resistor or a current source as the load seen by the 
CCD output FET. There are some times when a current source can provide a 
slightly higher gain and therefore lower noise in the CCD readout. The 
AIS 1 camera provides a programmable current by providing a 
pragrammable voltage which is applied to the base of an emitter follower 
circuit. The emitter load, a resistor, converts this voltage to a current 
through the tansistors collector which is connected to the CCD output FET’s 
source. The CCD load for each side of the camera may be independantly 
selected by jumpers J3 and J6 on the socket card. This selection determines 
whether the CCD output drives the load resistor or the current source. 
Another jumper selection, jumpers J2 and J5, determine whether the 
curent sources will have a fixed current or be controlled by the 
programmable voltage. The current source was not part of the original 
design of the caera electronics and represents another use of one of the 
extra clocks that were designed into the system. The current source 
transistor's base is tied to extra clock 2. The range of the programmable 
voltage is shown below. 

( current source ) 

extra clock 2 high -12.5/+12.5 

extra clock 2 low -12.5/+12.5 
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At the time that the AIS1 camera design was first being 
implemented, it was decided that all CCD clock rails and DC potentials 
should be programmable. This philosophy was carried through the later 
parts of the design and was implemented to the extent deemed 
advantageous to the best operation of the CCD. One voltage which was 
provided as a programmed voltage but not used as such in the final system 
is the CCD substrate. A programmable voltage was provided for this 
potential, and is connected to the camera head feedthrough connector, but 
is not used in the circuit. It was learned through experimentally that this 
potential should be tied to a good ground point in the circuit, and the CCD 
substrate actually provides the center point for the "star" grounding 
system in the final AIS1 camera configuration. The voltage and it's range is 
shown below pimarily for completeness. Adjusting the "substrate" voltage 
has no affect whatsoever on the system. 


substrate -5.0/+5.0 


There are two additional clocked signals available which are unused 
in the STIS AIS1 camera system, but which could be of some use with a 
different CCD or some other circuitry. They are provided for future use and 
changing their values will have no affect on the system as it stands. These 
voltages are listed below. 


extra switch 3 low 
extra switch 3 high 
extra switch 4 low 
extra switch 4 high 


-12.5/+12.5 
-12.5/+12.5 
-1 2.5/+ 12.5 
-12.5/+12.5 
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Table 14.1 


AIS1 Camera Programmable Voltages 


voltage 

min 

parallel clock low 

-12.5 

parallel clock midrange 

-12.5 

parallel clock high 

-12.5 

transfer gate low 

-12.5 

transfer gate high 

-12.5 

serial clock low 

-12.5 

serial clock midrange 

-12.5 

serial clock high 

-12.5 

summing well low 

-12.5 

summing well hig 

-12.5 

reset gate low 

0 

reset gate high 

0 

last gate 

-5.0 

reset drain 

+5.0 

output drain 

+5.0 

substrate 

-5.0 

extra switch 1 low 

-12.5 

extra switch 1 high 

-12.5 

extra switch 2 low 

-12.5 

extra switch 2 high 

-12.5 

extra switch 3 low 

-12.5 

extra switch 3 high 

-12.5 

extra switch 4 low 

-12.5 

extra switch 4 high 

-12.5 


max comment 

+ 12.5 

12.5 

12.5 

12.5 

12.5 

12.5 

12.5 

12.5 

12.5 
+ 12.5 

+ 15.0 (unused) 

15.0 

5.0 

20.0 

25.0 

5.0 (unused) 

12.5 (unused)(clamp) 

12.5 (unused)(clamp) 

12.5 (unused)(current source) 

12.5 (unused)(current source) 

12.5 (unused) 

12.5 (unused) 

12.5 (unused) 

12.5 (unused) 
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14.2 CCD Protection Circuitry 

Since the various programable voltages on the clock cards are 
generated by digital to analog converters whose power-up status is 
indeterminate, it was decided that an effort should be made to assure that 
the voltages when randomly assigned, would not in any way damage the 
CCD device. Two different approaches were taken in the design f the 
system to make this assurance. The first is that of limiting the range of the 
various voltages so that there could not be excessive potential across any 
of the gates. The CCD substrate was therefore limited to -5/+5 volts so that 
there could be no more than 17.5 volts from any parallel or serial clock rail 
and the CCD substrate. With the substrate grounded, as in the final camera 
configuration, there can be no more than 12.5 volts between any one of 
these clocks and the substrate and no more than 25 volts between any two 
clock gates. These potentials are considered safe. 

Additionaly, circuitry was provided for essentially disconnecting the 
clocking signals from the CCD. The clock signals and DC potentials are 
passed through FET analog switches before the signal buffers. By opening 
these switches, the buffers are disconnected from the clock potentials and 
their inputs see only a resistive load to ground. In this way all the CCD 
clock potentials are tied to a near groud potential. These switches are open 
by default at power up and must be closed by the DSP software. They may 
be opened at any time through the software and, if desired, the CCD may 
be safely removed from its socket wihout powering down the system. 

Catastrophic failure of the clock card circuitry or unpredictable 
behavior by the DSP program should not harm the CCD due to the limits 
placed on the programable voltage ranges discussed above and the limited 
range of the power supply voltages in the system. 
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14.3 Software Interface for Programmable Voltages 

The programable CCD volatges inthe AIS1 camera system are 
supported in different ways at all levels in the camera software. The DACs 
that are used to produce the voltages are mapped into the DSPs address 
space, the FORTH interpreter handles the different sets of voltages for the 
various clock cards in the system, and the user may adjus the voltages 

either from a terminal or through one of the utility programs available on 
the sun workstation. No direct manipulation of the voltages is provided in 

the IRAF interface software, but the user may manipulate them from 

within the IRAF shell by calling one of the utility programs as an external 
command. 

Each level of software associated with the programmable clock 
voltages will be discussed in turn below. 

14.3.1 DSP Control of Programmable Voltages 

The clock cards in the AIS1 camera system are mapped into the DSP 
sequencer's address space as a set of registers. Twenty four of these 

registers are the eight bit DACs that set the various potentials. The DSP sets 
the clock voltages simply by enabling the particular clock card in question 
and writing to those locations. The clock cards are mapped into the upper 
portion of the DSPs "Y" memory space. The DACs occupy the following 
locations: 


Table 14.2 - DSP Voltage Nmemonics and Addresses 


clock name 
Parallel low 
parallel midrange 
parallel high 
serial low 
serial midrange 
serial high 
transfer gate low 
transfer gate high 
summing well low 
summing well high 
CCD substrate 
last gate 
reset gate low 
reset gate high 
reset drain 


DSP nmemonic 

par_lo 

par_mid 

par_hi 

ser_lo 

ser_mid 

ser_hi 

tg_lo 

tg_hi 

sw_lo 

sw_hi 

sub 

lg 

rst_lo 

rst_hi 

vrd 


DSP address (hex) 

ff08 

ff09 

ffOa 

ffOb 

ffOc 

ffOd 

ffOe 

ffOf 

fflO 

ffll 

f f 1 2 

ff 13 

ff 14 

ff 1 5 

ff 1 6 
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output drain 

vod 

ff 17 

extra switch 1 low 

xl_lo 

ffl 8 

extra switch 1 high 

xl_hi 

ff 1 9 

extra switch 2 low 

x2_lo 

ffl a 

extra switch 2 high 

x2_hi 

fflb 

extra switch 3 low 

x3_lo 

ffl c 

extra switch 3 high 

x3_hi 

ffld 

extra switch 4 low 

x4_lo 

ffle 

extra switch 4 high 

x4_hi 

fflf 


The DSP does not keep track of the voltage settings nor does it have 
any way of measuring the actual voltage that is produced. It simply sets 
the DACs to the values requested by the controller, the 68HC11, when it is 
requested to do so. 

14.3.2 FORTH Interface for Programmable Voltages 

The controller, the 68HC11, is resoponsible for keeping track of the 
desired clock voltage settings and for initializing them when so requested. 
The 68HC11 only records the value that the user desires to have written to 
the DAC, it does ot have any way of knowing what that voltage will 
actually be, nor does it have any way of measuring the voltage produced. 
Since the voltages are controlled by eight bit DACs, the legitimate values 
for their settings range from 0 to 255. A setting of 0 will produce the 
voltage at the bottom of the voltage's range and a setting of 255 will 
produce a voltage at the top of the range. A setting of 128 will produce a 
voltage at half range, which is approximatelt 0.0 volts for many of the 
sigals in the system including the parallel and serial clocks, the transfer 
gate and the summing well. The 25 volt range of these clocks and the 255 
different settings provide a convenient 0.10 volt approximate step for each 
increment of the DAC value. 

A separate table of DAC settings is maintained for each clock card in 
the system. Since the STIS camera is a two channel system, there are two 
tables of DAC settings in the FORTH dictionary. These tables are 
"remembered" along with the rest of the dictionary from session to session 
if desired and a set of standard DAC settings may be maintained this way 
in the camera controller. New settings may be made at any time by 
changing the table entry and issuing the command to initialize the clock 
card with the current settings. The tables and the associated commands are 
discussed below. 

The voltage tables for each clock card in the system are stored as 
separate tables, allowing the software to be easily expanded to include 
support for more CCD readout channels. The tables are essentially indexed 
arrays, and any voltage in the table may be addressed by index and table 
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name, but it is often easier to associate a specific name with the voltage in 
question. Both methods of addressing the table elements are supported. 

The table of DAC settings for channel 0 is referred to as CAMO_VOLT, 
and the elements of the table may be read and written by index as in: 

(value) (index) CAMO_VOLT C! 
to set a new value and 

(index) CAMO_VOLT C@ 

to retrieve the value of an element. Note that since the values are eight 
bits in size, the C@ and C! commands are ued to store and retreive the 
values. The table of DAC settings for channel 1 is referred to as 

CAM 1_ VOLT and is addressed in a similar way. The order of the voltages 

in the tables is the same as the order in which they occupy the DSP 

memory space. 

Since it may be difficult to remember the correct sequence of the 
values, individual FORTH definitions have been defined which index into 
the array the correct amount to access thevarious values, and nmemoic 

names have been asigned to them to make the tables more easily 
accessible to humans. The FORTH definitions simply index the array. An 
example of one of these definitions is shown below. 

: CAMO_PAR_LO 0 CAMO_VOLT ; 

This definition exists solely to allow the user or a control program to access 
the voltage setting by name instead of by index. Setting the value of the 
parallel low voltage for channel 0 can be accomplished as shown below. 

(value) CAMO_PAR_LO C! 

Such defintions exist for all the voltages in the system and their names are 
listed below. 


14-10 



Table 14.3 - AIS1 Channel 0 FORTH Voltage Definitions 


voltage 
parallel low 
parallel midrange 
parallel high 
serial low 
serial midrange 
serial high 
transfer gate low 
transfer gate high 
summing well low 
summing well high 

FORTH name 

CAMO_PAR_LO 

CAMO_PAR_MID 

CAMO_PAR_HI 

CAMO_SER_LO 

CAMO_SER_MID 

CAMO_SER_HI 

CAMO_TG_LO 

CAM0_TG_HI 

CAMO_SW_LO 

CAM0_SW_HI 

comment 

CCD substrate 
last gate 

CAMO.SUB 

CAMO.LAST 

(unused) 

reset gate low 
reset gate high 

CAMO_RST_LO 

CAMO_RST_HI 

(unused) 

output drain 

CAMO_VOD 

• 

reset drain 

CAMO_VRD 

(unused) 

extra switch 1 low 

CAMO_X1_LO 

(current source) 

extra switch 1 high 

CAM0_X1_HI 

(current source) 

extra switch 2 low 

CAMO_X2_LO 

(unused) 

extra switch 2 high 

CAM0_X2_HI 

(unused) 

extra switch 3 low 

CAMO_X3_LO 

(unused) 

extra switch 3 high 

CAMO_X3_HI 

(unused) 

extra switch 4 low 

CAMO_X4_LO 

(unused) 

extra switch 4 high 

CAM0_X4_HI 

(unused) 
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Table 14.4 - AIS1 Channel 1 FORTH Voltage Definitions 


voltage 

parallel low 
parallel midrange 
parallel high 
serial low 
serial midrange 
serial high 
transfer gate low 
transfer gate high 
summing well low 
summing well high 
CCD substrate 
last gate 
reset gate low 
reset gate high 
output drain 


reset 

drain 



extra 

switch 

1 

low 

extra 

switch 

1 

high 

extra 

switch 

2 

low 

extra 

switch 

2 

high 

extra 

switch 

3 

low 

extra 

switch 

3 

high 

extra 

switch 

4 

low 

extra 

switch 

4 

high 


FORTH name 

CAM 1 _P AR JLO 

CAM 1 _P AR_MID 

CAM 1 _P AR_HI 

CAM l_SER_LO 

CAM 1 _SER_MID 

CAM1_SER_HI 

CAMl_TG_LO 

CAM1_TG_HI 

CAMl_SW_LO 

CAM1_SW_HI 

CAM1_SUB 

CAMl.LAST 

CAMl_RST_LO 

CAM1_RST_HI 

CAMl_VOD 

CAM1_VRD 

CAM1_X1_L0 

CAM1_X1_HI 

CAMl_X2_LO 

CAM1_X2_HI 

CAMl_X3_LO 

CAM1_X3_HI 

CAMl_X4_LO 

CAM1_X4_HI 


comment 


(unused) 

(unused) 


(both channels) 
(current source) 
(current source) 
(unused) 
(unused) 
(unused) 
(unused) 
(unused) 
(unused) 
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14.4 Setting the CCD Potentials 

The programmable voltages may be manipulated in a variety of 
ways. Since the camera contains the FORTH interpreter and has the on 
board EEPROM for storing the FORTH dictionary, maintenance setup and 
diagnostics may be performed with a simple RS-422 terminal connected to 
the serial port on the controller. All camera operations may be performed 
through this interface, but, of course, no image data may be collected. This 
method of interacting with the camera may be useful for setting the clock 
voltages to new values if the desired values are known (i.e. when installing 
a different but previously tested CCD). The voltages may also be adjusted 
using one of the utility programs provided on the Sun workstation. The 
"AlSsetup" program may be used to send the default DAC settings file 
"AlSvolts" to the camera through the serial interface on the VMEbus 
interface card. The "sendfile" program may be used to send any arbitrary 
text file to the camera through that iterface, and tha file could contain a list 
of DAC settings. Either of these programs sends a simple ASCII text file to 
the camera. This file consists of FORTH commands and may include 
anything that the 68HC11 can compile or execute. As far as setting camera 
voltages is concerned, the files should contain lines such as that shown 
below. 

250 CAMO.VOD C! 

225 CAMO.VRD C! 

INIT- VOLTS 

The first two lines set the FORTH dictionary table entries for those two 
voltages to new values. The last line instructs the 68HC11 to initialize the 
clock voltages and actually change the DAC settings on the clock card. The 
text file may adjust whichever clock voltages are desired. If the file does 
not contain the INIT- VOLTS instruction, or some otherinstruction which 
will cause INIT-VOLTS to be executed, then the table entries will be 
changed but the CCD voltages will not. If it is desired to make these new 
values the defaults, then the instruction STORE should be placed in the file 
after the values have been updated. It is not necessary to initialize the 
DACs in order to store the new values as defaults. 

Additionaly, the AlSsay program can be used to manipulate a single 
clock voltage. This program is used to issue a single line of text to the 
camera. It is called from the UNIX command line in the following way. 

AlSsay <string> 

As an example : 
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AlSsay "134 CAMl.LAST C! INIT- VOLTS" 

would set the last gate DAC value for channel 1 to 134 and initialize the 
camera voltages. And the command 

AlSsay "134 CAM1_LAST C! STORE" 

would set the last gate voltage and store as the default. 
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14.5 Programmable Voltage Example File 
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AiSvolts 


Sat, Sap 19, 1992 5:17 PM 



:mal 

CAM 0 _PAR_LO 

C ! 

1 90 

CAMO _?AR_MI D 

C! 

149 

CAM0_PAR_HI 

C ! 

07 

CAM 0 __S ER_LO 

C! 

72° 

CAM0_SER_MID 

C! 

169 

CAM0_SER_HI 

C! 


CAM0_TG_LO 

C! 

- ■“ 'O 

CAM0_TG_HI 

C! 

O "! 

CAMO SW_LO 

C! 

169 

CAM0_SW_HI 

C! 

- ~ 0 

CAM0_SUB 

C! 

100 

CAM0_LAST 

C! 

0 

CAM 0 _RST_LO 

C! 

202 

CAM0_RST_H I 

C! 

220 

CAM0_VOD 

C ! 

i3G 

CAM0_VRD 

C! 

0 

CAMO_X1_LO 

C! 

1 23 

CAM0_X1_HI 

C! 

a 

1 j 

CAM0_X2_LC 

C! 

149 

CAM0_X2_HI 

C! 

0 

CAM0_X3_LG 

C! 

700 

CAM0_X3_HI 

C! 

3 

CAMO_X4_LO 

C! 

7 c; 

CAM0_X4_HI 

C! 

40 

CAM1 _PAR_LO 

C! 

190 

CAM 1 _PAR_MI D 

C! 

149 

CAM 1 _P AR_H I 

C! 

“■ / 

CAM1 SER_LO 

C! 

1 no 

CAM1_SER_MI D 

C! 

169 

CAM 1 _SER_HI 

C! 

76 

CAMl_TG_LO 

C! 

ISO 

CAM1_TG_HI 

C! 

32 

CAMl_SW_LO 

C! 

169 

CAM1 SW__HI 

C! 

128 

CAM1_SUB 

C! 

102 

CAMl^LAST 

C! 

0 

CAM 1 _RST_LO 

C! 

203 

CAM1_RST_HI 

C! 

221 

CAMl_VOD 

C! 

180 

CAM1_VRD 

C! 

0 

CAMl_Xl_LO 

C! 

123 

CAM1_X1_HI 

C! 

0 

CAM1_X2_L0 

C! 

149 

CAM1_X2_HI 

C! 

0 

CAMl_X3_LO 

C! 

occ 

^ -J 

CAM1 X3_HI 

C! 

0 

CAMl_X4_LO 

C! 

255 

CAM1_X4_HI 

C! 


DECIMAL 


15. Camera Configuration Parameters 

The operation of the AIS1 camera is controlled by a set of 
variables. These variables are stored in a “parameter table” and may 
be referenced by index or name. The parameters may be separated 
into several groups, each relating to a different aspect of camera 
operation. 

15.1 Format Parameters 

The first group of parameters are considered 'format' 
parameters. These parameters control the area on the CCD imager 
which will be read during the next image acquistion cycle. The 
format parameters may be set to any 16 bit value. They are 
considered unsigned numbers and range from 0 to 65535. No type of 
error checking is performed to assure that the current parameters 
match the user's CCD or that valid image data will be obtained. 
Complete flexibilty within the scope allowed by the geometry 
implied by the parameters is pursued instead. It is up to the user to 
assure that the parameters in use match his or her desires. Upon a 
system reset the format parameters will be returned to the value 
stored in the EEPROM memory. The format parameters may be 
stored there at any time using the STORE command which stores the 
entire FORTH dictionary. 

15.1.1 Serial Read Parameters 

The serial register is read out based on a set of format 
parameters which imply the following geometry: 


prescan underscan origin read dimension postscan overscan 

The readout operations are performed from left to right. 
The pixels in the prescan, origin, and postscan are discarded. The 
pixels in the underscan, the read dimension and the overscan are 
read off the CCD imager. The discarded pixels are in units of physical 
pixels and are not affected by the binning factor. The others are read 
off the chip and binning is performed. The same binning factor is 
used on the pixels in the underscan, read dimension, and overscan. 

Typically, 

prescan + {underscan * binning factor} = serial extension length 

and 
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dimension. 


origin + {binning factor * read dimension} + postscan >= CCD serial 


but this convention is not enforced. Not all users will care 
to use the underscan and overscan features. In this case the prescan, 
underscan, and overscan parameters may be set to zero and the 
following equation will be used. 

origin + {binning factor * read dimension} + postscan = total CCD serial 

length 


No effort is made to enforce this convention. It is simply that, 
a convenient convention. 

0 CCD_SER CCD Serial Dimension 

This parameter represents the total length of the CCD serial 
register. This includes any pixels in the serial extensions on either 
end of the register. This parameter is used by the DSP as the number 
of pixels to discard when it clears the serial register. It is irrelevent 
to those rows which are actually read. 

1 BIN_SER Serial Binning Factor : 

The serial binning factor is the number of pixels in the serial 
register which will be shifted for each pixel read. By binning pixels 
the image resolution is sacrificed for higher signal to noise ratio. In 
low light applications or where the image data is one dimensional 
this may be used to great benefit. 

2 PRE_SER Serial Prescan 

The serial prescan is the number of pixels to discard before 
performing the serial underscan. The prescan is in units of physical 
pixels and is not affected by the binning factor. No image data is 
produced. 

3 UNDER_SER Serial Under Scan 

The serial underscan is the number of pixels to read after the 
serial prescan. This parameter represents the number of binned 
pixels to read. One data point is produced for each unit of under scan. 
Binning is performed. 

4 ORG_SER Serial Read Origin 

This number represents the number of pixels to be discarded 
after performing the serial under scan. This parameter is in units of 
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physical pixels and is unaffected by the binning factor. No image data 
is produced. 

5 READ_SER Serial Read Dimension 

The value of this parameter represents the number of pixels to 
read after the serial origin and before the postscan. These pixels are 
represened in units of binned pixels. One data point is acquired for 
each unit of read dimension. Binning is performed. 

6 POST_SER Serial Postscan 

The value of this parameter represents the number of pixels 
todiscard after the read is performed. These pixels are representedin 
units of physical pixels and are not affected by binning factor.No 
image data is produced. 

7 OVER_SER Serial Overscan 

The value of this parameter represents the number of data 
points to be taken after the postscan is performed. These pixels are 
represented in units of binned pixels. One data point is acquired for 
each unit of serial overscan. Binning is performed. 

4.1.2 Parallel Read Parameters 

The parallel register is read out based on a set of format 
parameters which imply the following geometry: 


origin read dimension postscan overscan 

The readout operations are performed from left to right. The 
rows in the origin and post scan are discarded. The rows in the the 
read dimension and the overscan are read off the CCD imager. The 
discarded rows are in units of physical rows and are not affected by 
the binning factor. The others are read off the chip and binning is 
performed. The same binning factor is used on the rows in the read 
dimension and overscan. 

8 CCD_PAR CCD Parallel Dimension 

This parameter represents the total length of the CCD parallel 
register. This parameter is it clears the parallel register. It is 
irrelevent to those rows which are actually read. 

9 BIN_PAR Parallel Binning Factor 
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The parallel binning factor is the number of rows in theparallel 
register which will be shifted for each row read. By binning rows the 
image resolution is sacrificed for higher signal to noise ratio. In low 
light applications or where the image data is one dimensional this 
may be used to great benefit. 

1 0 ORG_PAR Parallel Read Origin 

This number represents the number of rows to be discarded 
before performing the parallel read. This parameter is in units of 
physical rows and is unaffected by the binning factor. No image data 
is produced. 

1 1 READ_PAR Parallel Read Dimension 

The value of this parameter represents the number of rows to 
read after the parallel origin and before the postscan. Theserows are 
represened in units of binned rows. Binning is performed.Image data 
is produced. 

1 2 POST.PAR Parallel Postscan 

The value of this parameter represents the number of rows to 
discard after the read is performed. These rows are represented in 
units of physical rows and are not affected by binning factor.No 
image data is produced. 

1 3 OVER_PAR Parallel Overscan 

The value of this parameter represents the number of rows to 
be read after the postscan is performed. These rows are represented 
in units of binned rows. Binning is performed. Image data is 
produced. 

15.2 Exposure Parameters 

Exposure parameters include shutter delays, exposure time, 
and the number of times the CCD should be cleared prior to the 
exposure. 

Two parameters are used when opening and closing the 
shutter. Since the shutter takes a certain amount of time to open, and 
it would be undesirable to begin to time the exposure or read out the 
CCD before the shutter motion had stopped, these two parameters are 
provided to allow the user to set the delay which will take place 
after the camera controller opens or closes the shutter. The values 
are stored as 16 bit numbers representing milliseconds. Delay times 
may therefore vary from 0 to 65.535 seconds. If your shutter takes 
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longer than this to open or close, you will need to write custom open 
and close routines. 

2 0 ODELAY Shutter Open Delay 

The shutter open delay is the time, in milliseconds, that the 
camera controller will pause after opening the shutter to be sure that 
it is fully open. Typical values for small aperture shutters are around 
8 to lOmilliseconds. The value of the shutter open delay may be as 
great as 65535 milliseconds. 

2 1 CDELAY Shutter Close Delay 

The shutter close delay is the time, in milliseconds, thatthe 
camera controller will pause after closing the shutter before 
continuing. This is to be sure that we do not begin shifting the charge 
on the CCD until the shutter is closed. Typical times for small apeture 
shutters are around 10 to 20 milliseconds. The value of the shutter 
close delay may be as great as 65535 milliseconds. 

2 2 EXP_TIME_LO lower 16 bits exposure time 

2 3 EXP_TIME_HI upper 16 bits exposure time 

The exposure time for image acquisitions is stored as a 32 bit 
value in two 16 bit parameters. The value represents the exposure 
time in milliseconds. The exposure time may therefore be set from 0 
milliseconds to just over 7 weeks. This should be sufficient to cover 
most applications. 

2 4 NUM_CLEARS number of clears 

Certain camera commands will clear the CCD as part of thier 
operation. These commands are typically high level image acquisition 
commands. The number of times that the CCD is cleared in these 
circumstances is controlled by the value of the following parameter. 
A typical value for this parameter is two, but it may range from 0 to 
65535. A value of zero may be of use under some circumstances 
where it is not desirable to clear the imager at all. A value of 1 is 
acceptable under most conditions where a cleared CCD is desired. The 
default value typically assigned is 2 is conservative. Values greater 
than 2 are likely to be useful only under unusual circumstances. 

15.3 Acquisition Sequence Parameters 

The camera may be operates in a sequenced acquisition mode. 
Each high level image acquisition command actually acquires a 
sequence of images based on the values of these parameters. 
Continuous clearing ofthe CCD may be performed between images. 


15-5 



Clock recombination anti-blooming may be performed during 
exposures. The camera may acquire images in a frame transfer mode. 
The camera readout may be performed at either of two speeds. 

2 5 NUM_IMAGES number of images 

The NUM_IMAGES parameter determines the number of 
images that will be acquired in each acquisition sequence. 

26 IM_DELAY_LO lower 16 bits of image delay 

27 IM_DELAY_HI upper 16 bits of image delay 

The camera controller will pause between images in the 
sequence for the number of milliseconds represented by the value of 
IM_DELAY parameter. The parameter is represent as two 16 portions 
to allow for delays of greater than 65.535 seconds. The delay is 
executed after the first image in the sequence. If the number of 
images is set to 1, the camera controller will still execute the delay 
before responding with the ‘OK’ prompt. 

3 0 CCLEAR Continuous Clear Flag 

The value of this parameter determines whiether the camera 
will perform continuous clearing of the CCDbetween exposures. 

0 = continuous clearing disabled 

1 = continuous clearing enabled 

3 1 ANTI-BLOOM Anti-Blooming Flag 

The value of this parameter will determine whether the 
camera will perform clock recombination anti-blooming during the 
exposures. 

0 = anti-blooming disabled 

1 = anti-blooming enabled 
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16. Camera Controller FORTH Software 


16.1 FORTH Command Interpreter 

All communication between the camera and the host computer 
consist of ASCII text strings. All commands from the host to the 
camera consist of numeric data and FORTH commands. The MCU’s 
FORTH interpreter processes these strings and call the appropriate 
routines. Some of the commands require operands to be passed 
previously. A selection of static parameters reduces the number of 
operands that need to be passed. Parameters may be stored as 
system defaults. A series of commands may be issued to the camera 
by sending a series of parameters and commands separated by 
spaces and followed by a carriage return. A maximum of 256 
characters may be sent at any time including the carriage return. The 
strings issued to the camera may include command definitions, and 
these commands may be stored as part of the default command set. 

The microcontroller used in the AIS1 camera includes an eight 
kilobyte ROM that contains a FORTH-83 compliant FORTH interpreter. 
All the software written for the MCU is written either in FORTH or 
68HC11 assembler instructions. 

The MCU program may be considered to be layers of code with 
increasing degrees of complexity. Each layer is built out of functions 
contained in the preceding layers. The camera's FORTH dictionary 
may be selectively removed from interactive access, effectively 
removing selected functions. In this way, a programmer can take 
advantage of the built-in FORTH interpreter for processing the 
command strings, but limit the number and, more importantly, type 
of functions available to the user. 

At the bottom level is the New Micros Max-FORTH F83 
compliant dictionary and the extensions that have been added by the 
MCU's manufacturer. The next level consists of MCU specific and 
camera specific I/O routines. These routines are used to manipulate 
the MCU's control registers and the hardware in the system. These 
include functions that read and set the CCD temperature, read the 
case temperature, open and close the shutter, initialize and 
communicate with the DSP, set the camera gain, set and return 
parameter list values, and perform other low level operations. 

A variety of functions that perform charge shifting and pixel 
conversion exist at the intermediate level. All of these operatiuons 
include action by the DSP. Out of these functions the user may build 
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customized charge shifting and pixel readout sequences. Under 
normal circumstances these functions will be called indirectly 
through the short form command interpreter described below. 

There is also a set of high level image acquisition commands. 
There are functions for acquiring all the standard types of images 
from the camera, including bias frames, dark frames, and object 
exposures. The elemental parts of these high level image acquisition 
routines are also available, including functions to clear the CCD, 
expose it to light or integrate dark current, and to read the charge off 
the CCD. Under normal circumstances the user will call the highest 
level functions rather than re-creating them from their parts. Most 
often these functions will be called via the short form commands. 

A short form command interpreter is provided to minimize the 
overhead associated with the serial transmission of commands from 
the host computer to the MCU. All the functions necessary for normal 
operation of the camera are available. 

16.2 FORTH Command Descriptions 

The Following sections describe the various FORTH commands 
in some detail. They are presented in order of complexity with the 
highest level commands listed first. The 'short form commands' are 
listed first, for details on their operation, plesse seee the descriptions 
of the functions they call in the following sections. 

16.2.1 Short Form Commands 

A set of short form commands is provided that is particularly 
useful to those very familiar with the command set or for 
programmed hardware interfaces, such as the Advanced 
Technologies VMEbus interface. All commands in the set are 
abbreviated to three letters in order to maximize the transfer rate of 
comands between the host computer and the camera controller. 


CXX 

COLD 

restart the FORTH interpreter 

CIN 

INIT 

initialize the camera 

ST@ 

TEMP! 

CCD temperature short form 

STC 

CCD-TEMP? 

CCD temperature long form 

ST! 

TEMP! 

set the CCD temperature 

SCF 

CISC-OFF 

disable continuous clearing 

SCT 

CISC-ON 

enable continuous clearing 

SBF 

CRAB-OFF 

disable anti-bloming 

SBT 

CRAB-ON 

enable anti-blooming 

SSO 

OPEN 

open the shutter 

ssc 

CLOSE 

close the shutter 
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SIV 

INIT-VOLTS 

initialize CAM voltages 

SIF 

INIT-FORMAT 

iniitialize format parameters 

SIS 

INIT-STATES 

initialize timing parameters 

SPD 

SET -P AR_DEL AY S 

set the parallel delays 

FF? 

FORMAT? 

fetch the format parameters 

FSF 

INIT-FORMAT 

initialize format parameters 

LPB 

PIX-BIN 

bin N pixels 

LRB 

ROW-BIN 

bin N rows 

LPC 

PIX-CLR 

discard N pixels 

LRC 

ROW-CLR 

discard N rows 

LPR 

PIX-READ 

read N pixels 

LRR 

ROW-READ 

read N rows 

LCW 

CAM-WRITE 

write a value to a camera address 

1 1 L 

EXPOSEJXD 

integrate light 

IID 

INTEGRATE_DARK 

integrate dark 

IRD 

READ 

read the image off the CCD 

ICL 

CLEAR 

clear the CCD of all charge 

IAB 

BIAS 

acquire bias 

IAD 

DARK 

acquire dark 

IAL 

OBS 

acquire light 

ACE 

ALL-CLKS-EN 

enable all the CCD clocks 

ACD 

ALL-CLKS-DIS 

disable all CCD clocks 


16.2.2 High Level Image Acquisition Routines 

There is a set of high level image acquisition routines which are 
used to initiate a complete CCD exposure and readout sequence. 
These routines are described below. 

READ 

Read the image data off the CCD. The CCD is read out 
based on the current format parameters. 

CLEAR 

Clear the entire CCD array, NUM_CLEARS times. All charge 
is cleared off the CCD. 

BIAS 

Acquire a bias frame, NUM_IMAGES times. The shutter is 
closed, CISC stopped, the CCD is cleared, the image data is 
read off the chip based on the current format parameters. 
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continuous clearing of the chip is begun, if enabled, and 
then a delay of IM_DELAY milliseconds is executed. This 
entire sequence is executed NUM_IMAGES times. 

DARK 

Acquire a dark reference frame, num_images times. The 
shutter is closed, CISC stopped, the CCD is cleared, dark 
current is integrated for EXP_TIME milliseconds, the 
image data is read off the chip based on the current 
format parameters, continuous clearing of the chip is 
begun, if enabled, and then a delay of IM_DELAY 
milliseconds is executed. This entire sequence is 
executed NUM_IMAGES times. If enabled, clock 
recombination anti-blooming is performed during dark 
frame integration. 

OBS 

Acquire a light frame, num_images times The shutter is 
closed, CISC stopped, the CCD is cleared, the shutter is 
opened, light is integrated for EXP_TIME milliseconds, the 
shutter is closed, the image data is read off the chip 
based on the current format parameters, continuous 
clearing of the chip is begun, if enabled, and then a delay 
of IM_DELAY milliseconds is executed. This entire 
sequence is executed NUM_IMAGES times. If enabled, 
clock recombination anti-blooming is performed during 
light integration. 


16.2.3 Low Level Image Acquisition Routines 

There is a set of low level image acquisition routines. A small 
amount of additional overhead is associated with a read sequence 
based on low level routines, due to increased participation by the 
68HC11, but very complicated read sequences can be constructed. 
Not all programmers will need to use these routines, as normal 
operational modes are fully supported by the high level image 
acquisition routines. Low level image acquistion routines include the 
following: 

PIX-BIN <N> PIX-BIN 
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Bin N pixels in the serial direction. N serial shifts are 
performed. Binning factor is not used. N is an integer 
from 0 to 65535. 

ROW-BIN <N> ROW-BIN 

Bin N rows in the parallel direction. N parallel shifts are 
performed. Binning ifactor is not used. N is an integer 
from 0 to 65535. 

PIX-CLR <N> PIX-CLR 

Discard N pixels in the serial register. Binning factor is 
not used. N is an integer from 0 to 65535. 

ROW-CLR <N> ROW-CLEAR 

Discard N rows in the parallel register. Binning factor is 
not used. N is an integer from 0 to 65535. 

PIX-READ <N> PIX-READ 

Read N pixels out of the serial register. Binning is 
performed. N is an integer from 0 to 65535. 

ROW-READ <N> ROW-READ 

Read N rows off the CCD. Binning is performed. 

N is an integer from 0 to 65535. 


16.2.4 Shutter Control 

Two routines exist for manipulating the camera’s shuuter. Their 
purpose is self-evident. There are shutter delay parameters which 
determine how long the controller will wait for the shutte blades to 
actually finish moving. See the parameter descriptions for more 
information. 

OPEN 

Open the camera's shutter. 

CLOSE 

Close the camera's shutter. 


16.2.5 Temperature Measurement 
TEMP? 
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Reports the temperature of the CCD in an unformatted 
ASCII string of the form: 

-85<CR> 

TEMP! 

<N>TEMP! 

Set the desires CCD temperature to a new value. N is the 
desired temperature. N is an integer that may vary from 
-200 to +55. 

CCD-TEMP? 

The CCD temperature is reported as an ASCII text string 
of the form : 

<CR> CCD temperature = -125 <CR> 

TEMP-DIFF? 

Reports the difference between the temperature of the 
CCD and the desired temperature in an unformatted 
ASCII string of the form: 

-85<CR> 


16.2.6 Format commands 

These two words may be used to set and examine the format 
parameters. In each case the format parameters are passed as a 
simple character stream. 

FP! <M><N>FP! 

Set the value of a format parameter. N is the parameters 
index in the parameter table, and M is the new value for 
the parameter. 

FP@ 

<N>FP@ 

Fetch and print a parameter value. N is the parameters 
index in the parameter table. 

INIT-FORMAT 

Initialize the format parameters. The current format 
parameter values are passed to the DSP sequencer for use 
during subsequent image acquisitions. This function, or 
one of its short forms ‘SIT’ or ‘FSF’ must be called for 
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parameter changes to take effect. If the ‘FP!’ command is 
used to change the parameters, then this command is 
unneccessary, as it is included in ‘FP!’. 

FORMAT? 

Fetch the current format parameters. The current format 
parameters are reported in a single text string in the 
following order: 

CCD_SER 

BINJSER 

PRE.SER 

UNDER.SER 

ORG_SER 

READ.SER 

POST.SER 

OVER_SER 

CCD_PAR 

BIN.PAR 

ORG_PAR 

READ.PAR 

POST.PAR 

OVER.PAR 

They are reported on a single line. 


16.2.7 CCD voltages 

Two routines exist for handling the CCD voltages. The first 
prints the voltages in a table. The second initializes the clock cards 
with the new voltages. Simply chnging the values in the voltage 
tables does not affect the actual voltages applied to the CCD. Calling 
INIT-VOLTS sets all the voltages to the current table values. 

SHOW-VOLTS 

This function is used to generate a lsiting of the current 
CCD clock voltage DAC settings. The voltages themselves 
cannot be read by the system. This function lists the eight 
bit values that are to be written to the DACs during an 
INIT-VOLTS or SIV operation. The actual voltages depend 
on the way the various parts of the hardware are 
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configured. If you need this function, you probobly know 
how the numbers relate to the voltages. 

INIT-VOLTS 

Initialize the CCD voltages. The current values of the 
clock voltages are downloaded to the DSP, and written to 
the DACs on the clock card. This function, or its short 
form SIV should be called after changing the voltage 
table entries in order to have the new settings take 
effect. See also SIV. 


16.2.8 CCD timing 

The timing of the clock waveforms applied to the CCD is 
programmable in this camera system. The desired CCD clock timing is 
stored in tables. These functions are used to examine those timing 
tables. INIT-STATES is used to initialize the DSP sequencer with the 
current table entries. For a more detailed description, please see the 
chapter describing the programmable timing. 

INIT-STATES 

Initialize timing states. The current ttiming tables are 
downloaded to the DSP sequencer for use as clock timing 
in subsequent CCD readouts. This command, or its short 
form ‘SIT’, must be called after changing the state tables 
in order for the changes to take effect. See also SIT. 


SET-PAR_DELAYS 

<N> SPD or <N> SET-PARJDELAYS 

Set the parallel delay times to a new value. The AIS 
cameras support different delay times between the 
various stages of a parallel shift. This feature is usually 
unused. This function allows one to set all the delays to a 
single value. It is convenient. The new values will not 
take effect until a SIF or INIT-FORMAT command has 
been received. 

SHOW-PAR_S TATES 

This function is used to generate a listing of the timing 
states currently in the table associated with charge 
shifting in the parallel direction. This is performed the 
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same way in both the slow and the fast modes. This 
function is used by the user who wishes to modify the 
timing states to change the way the parallel clocks are 
run. The average user has no need to view or modify 
these tables. 

SET-PAR_DELAYS 

This function is used to set the parallel clock delay values 
to some value. The camera software supports different 
values for parallel delay between the steps in the parallel 
shift, but these are usually set to the same value 

SHOW-ANTI-BLOOM_STATES 

This function is used to generate a listing of the timing 
states currently in the table associated with clock 
recombination anti-blooming. 

SHOW-SER_STATES 

This function is used to generate a listing of the timing 
states currently in the table associated with the shifting 
of charge in the serial register during a slow mode bin, 
discard, or read operation. This table contains the serial 
clock timing only. This function is for use by the user who 
is modifying the camera’s timing and needs to see the 
current settings. 

SHOW-ANA_STATES 

This functions are used to generate a listing of the states 
currently in the tables associated with pixel readout in 
the slow mode. The signals represented here are 
generated at time intervals determined by the entries in 
the SLOW_DELAY table. These functions are of interest to 
the user who is changing the CCD and conversion timing. 
The average user has no need to see these tables. 


16.2.9 Camera Speed 

The AIS1 readout speed is adjustable from approx 40kHz 
downward. The exact speed depends on some timing variables, most 
importantly the integration time of the dual slope integrator. The 
SPEED may be adjusted over a much wide range and. As the 
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ANALOG TO DIGITAL convertors architecture is that of a dual slope 
integrator, the gain of thr system is directly afected by the 
integration time. The integration time is determined by the values of 
ANA_DELAYs 7 and 9. Several words are provided here to set the 
cameras slow readout rate to convenient values. 

ITIME! 

<N> ITIME! 

This function sets the integration time for the slow speed 
analog processor. It expects a 16 bit number on the stack 
with a value ranging from 1 -> 65535. This value is used 
by the DSP as a counter for the integration delay. The DSP 
delays 100 ns for every unit in the integration time. 
Integrations may therefore vary from 100ns to 6.5535 
ms. In practice, there is approx 350 ns overhead in the 
delay time and 100ns integration times are not possible. 
Additionally, if the time is set too short, the converter 
will not have finished converting the previouspixel when 
the new command to convert comes along. Integration 
times as short asl us should work fine. Extremely long 
integrations will saturate the converter. 

SPEED! 

<N> SPEED! 

This function is used to set the readout speed to a 
particular value. It expects the new value for the 
integration time on the stack. It is used primarily as a 
convenience for the definition of the functions that 
follow. 

40KHZ, 35KHZ, 30KHZ, 20KHZ, 15KHZ, 10KHZ, 5KHZ 

These functions are used to set the camera’s readout 
speed. They set the readout mode to slow, and set the 
analog delays appropriatly to establish the requested 
readout speed. The speeds that result are fairly obvious 
from the function names. 


16.2.10 Continuous Clearing of the CCD 

It is often desirable to continuously clear charge off the CCD 
between image acquisitions. If there is no shutter in the system or if 
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the temperature of the CCD is fairly high this is very desirable. In a 
cryogenic camera, this is not as important since the dark current is 
typicaly very low. The 'CISC’ terminology comes from the 
Photometries CC200 cameras, where it stood for 'Clear Image and 
Storage Continuously'. Continuous clearing of the camera is 
performed by the DSP. A parameter is maintained that may be polled 
at any time to determine if it should do so. 

START-CISC 

Begin clearing the CCD continuously. Does not affect the 

status of the CCLEAR parameter. 

STOP-CISC 

Stop the continuous clearing of the CCD. Does not affect 

the status of the CCLEAR parameter. 

CISC? 

Examine CCLEAR parameter and begin to continuously 

clear the CCD if it is true. 

CISC-ON 

Enable continuous clearing of the CCD between frames. 

CISC-OFF 

Disable continuous clearing of the CCD between frames. 


16.2.11 Clock Recombination Anti-Blooming 

Clock recombination anti-blooming is controlled by the DSP. It 
may be told to begin the process through a Host Command at any 
time that it is not executing any other host command. It will continue 
until the 68HC11 tells it to stop. The 68HC11 will call this function 
during exposures if the ANTI-BLOOM parameter is set to true. 

START-CRAB 

Begin clock recombination anti-blooming. Does not affect 

the status of the ANTI-BLOOM parameter. 

STOP-CRAB 

Stop clock recombination anti-blooming. Does not affect 

the status of the ANTI-BLOOM parameter. 
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CRAB? 

Examine the ANTI-BLOOM parameter and begin clock 
recombination anti-blooming if it is true. 

CRAB-ON 

Set the ANTI-BLOOM parameter to true. 

CRAB-OFF 

Set the ANTI-BLOOM parameter to false, and stop clock 
recombination anti-blooming if it is in progress. 


16.2.12 CCD Image Integration 

These routines are used to manipulate the exposure counter, to 
initiate exposures, terminate exposures, and perform complete light 
or dark current integrations. 

EXP_LEFT@ 

This function is used to query the time remaining in the 
current exposure sequence. It may be called at any time. 

EXP.LEFT! 

This function is used to set the remaining exposure time 
to some value. It is used internally by the exposure 
commands and is not normally needed by the user. 
Programmers may use this function in custom exposure 
commands if so desired. 

EXP-START 

This function is used to begin an exposure sequence. The 
EXP_TIME parameter is copied into the EXPJLEFT 
variable, the shutter is opened, and the exposure timer is 
started. Control is returned to the host immmediately, 
without waiting for the exposure to complete. 

EXP-PAUSE 

This function is used to pause an exposure in progress. 

The shutter is closed and the exposure timer is stopped. 

The CCD is not read out and the remaining exposure time 
is maintained so that the exposure may be completed by 
issuing the EXP-RESUME command discussed below. 
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EXP-RESUME 

This function is used to resume an exposure that has 
been interrupted via the EXP-PAUSE command. The 
shutter is reopened and the exposure timer is restarted 
where it left off. If the EXP_LEFT variable has been 
changed in the interim, that is the exposure time that will 
follow. 

EXP-ABORT 

This function is used to abort an exposure in progress. 
The shutter is closed and the exposure counter is stopped. 
The EXP_LEFT variable is zeroed and continuous 
clearing of the CCD is begun if the CISC parameter is true. 
The CCD is not read out. No image data is generated. If it 
is desired to read the data at this point it may be done 
via the READ command. 

EXP-LEFT? 

This function is used to query the time remaining in the 
current exposure cycle. 

EXP-WAIT 

This function s used to wait for the completion of the 
current exposure cycle. 

EXP-STOP 

This function closes the shutter, and stops clock 
recombination anti-blooming. Used internally by the 
camera, it is not needed by the typical user. 

EXPOSE_CCD 

This function is used to perform a complte exposure cycle 
on the CCD. Calls EXP-START, EXP-WAIT, and EXP- 
STOP defined above. 

INTEGRATE-LIGHT 

Integrate light onto the CCD for EXP-TIME milliseconds 
The shutter is opened the exposure delay is performed, 
and the shutter is closed. Clock recombination anti- 
blooming is performed during the exposure if it is 
enabled. 

INTEGRATE-DARK 
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Integrate dark current onto the CCD for EXP-TIME 
milliseconds, the shutter is assumed to be closed already. 
Clock recombination anti-blooming is performed during 
the exposure if it is enabled. 


16.2.13 Time Measurement 

These routines are used to manipulate the system timer, a free 
running counter incremented every millisecond, and to measure the 
passing of time. These may be useful to the programmer who is 
constructing new image acquisition sequences or any other function 
that requires the accurate measurement of time. 

TIME@ 

This function fetches the cameras current timer value 
and places it on the FORTH stack as a double length 
number. This function may be of some use to the user 
who wishes to create custom FORTH definitions, but is 
otherwise unnecessary. It is used internally by the 
system software. 

TIME! <D>HME! 

This function expects a double length number on the 
FORTH stack and sets the system timer to that value. This 
function may be of some use to the user who wishes to 
create custom FORTH definitions, but is otherwise 
unnecessary. It is used internally by the system 
software. 

STOP-TIMER 

This function will stop the cameras free running timer. It 
is not usually necessary to call this function. Useful for 
debug. 

START-TIMER 

This function starts the camera’s free running timer. It is 
called at system startup by the INIT routine and need not 
usually be called by the user or a user program unless 
STOP-TIMER has been called. If the timer is not running, 
any function which calls M-WAIT or MS-WAIT will hang 
the system indefinitely. 
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MS- WAIT <D> MS-WAIT 

This function causes the system to pause for the number 
of milliseconds specified by the double length number 
passed on the FORTH stack. It may be of use to one who 
desires to create custom FORTH definitions. Since it 
accepts a double length number, very long delays may be 
generated. See also M-WAIT. 

M- WAIT <N> M-WAIT 

This function causes the system to pause for the number 
of milliseconds specified by the 16 bit value passed. This 
function may be of use to one who desires to create 
custom FORTH definitions. The number N ranges from 0 
to 65535, and the delay may therefore range from 0 to 
65.535 seconds. Extremely short delays may be noticably 
affected by the small amount of overhead associated with 
the execution of the task. 


16.2.14 System Maintenance 

The 'system maintenance' routines are used to perform low 
level initialization of the camera controller as well as to manipulate 
the FORTH dictionary. They are not needed normally. They are used 
by the system internally, and are available to the programmer. 

COLD 

The camera system software is restarted. This is 
esentially a software reset. 

INIT 

Camera initialization function. All parts of the camera are 
initialized or re-initialized. It is neccessary to call this 
function before using any of the other camera control 
functions. 

VERSION 

This function is used to query the camera about the 
software version that is currently running. Used 
primarily during software development. Reports the 
version and a date as an ASCII text string. 
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EEPROT 

This function is used to protect the EEPROM on the 
controller card from write accesses. It is used internall by 
the STORE function to protect the EEPRAOM after it has 
been written. It is not normally needed by the user. 

EEUNPROT 

This function is used to unprotect the EEPROM on the 
controller card. This allows the EEPROM locations to be 
written over. This function is used internally by the 
STORE function before writing the EEPROM. It is not 
normally used by the user. 

EE-! 

<N><M>EE-! 

This function is used to write a value into the EEPROM 
memory. It accepts two 16 bit numbers on the stack and 
operates just like the normal FORTH T command. N is the 
data and M is the address. 


EE-C! 

<N> <M> EE-C! 

This function is used to write a value into the EEPROM 
memory. It accepts two numbers on the stack and 
operates just like the normal FORTH ‘C ! ’ command. N is 
the 8 bit data and M is the 16 bit address. 

STORE 

This function is used to store the current state of the 
camera’s FORTH dictionary as the default. This includes 
all the format parameters, voltage and timing tables and 
any variables. Also, any user defined functions which the 
user desires to include in the default dictionary are 
saved. 

RESTOR 

This function may be used to restore the dictionary from 
the EEPROM at any time. Primarily used for debugging, 
this command is not needed in normal operation of the 
camera. The camera performs a RESTOR command on 
power-up reset or in response to a CXX command. 

CUT-DICT 
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This function s used to cut the FORTH dictionary at any 
point so that lower level functions will not be accessable 
to the user or host computer. The primary use of this is 
to prevent the user from changing parameter or timing 
information that should not be changed. The system 
manager might find it useful to cut the dictionary at a 
fairly high level once all the parameters and timing are at 
the desired state. The function returns two very 
important pieces of information: the address of the 

dictionary link that was broken and the value that should 
be placed there to restore the dictionary. 

BRIDGE-DICT 

This function is similar to CUT-DICT except it allows to 
continue the dictionary at any point. This can be used to 
disable access to a set of words 
' WORD2 ' WORD1 BRIDGE-DICT 

disables all words below WORD2 including WORD1. 


16.2.15 DSP Software Support 

The DSP program is developed on a PC, Macintosh, or Sun 
platform and the ‘.LOD’ file generated is downloaded to the camera 
using this function. 

DNLD 

download a new DSP sequencer program to the camera. 

DSP-BOOT 

reset the DSP sequencer in it’s bootstrap mode 

DSP-DUMP 

This function dumps DSP program code from the FORTH 
dictionary to the DSP sequencer. 

DSP-OK? 

check that the DSP is operating correctly and responding 
to host commands. Used internally by a variety of camera 
control functions to check status before proceeding. 
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INIT-DSP 

This function initializes the DSP sequencer. The DSP is 
reset and program code is transferred to it. The DSP-OK? 
function is then used to determine if the DSP is 
responding correctly. If not, an error message is 
generated. 

DSP8@ 

fetch 8 bit data values from the DSP56001 sequencer. 
The datum is left on theFORTH stack when it has been 
fetched. 

DSP16@ 

fetch 16 bit data values from the DSP. The datum is left 
on theFORTH stack when it has been fetched. 

DSP8! <N>DSP8! 

pass 8 bit data values to the DSP. N is the datum. 

DSP16! <N> DSP16! 

pass 16 bit data values to the DSP. N is the datum. 


16.2.16 Test Functions 

A small set of test functions are provided for hardware 
debug. Most are repetitive words that are useful for testing small 
subsets of the clock and analog cards.Useful for debugging the 
camera electronics. Not needed in normal operation. 

RREAD or READS 

read the CCD repeatedly until a character is recived 

through the serial communications link. 

RCLEAR 

clear the CCD repeatedly until a character is recived 

through the serial communicatyions link. 

RBIAS 

acquire bias frames repeatedly until a character is 

received through the serial communications link. 

ROBS 


16-18 


acquire exposures repeatedly until a character is received 
through the serial communications link. 

RDARK 

acquire dark frames repeatedly until a character is 
received through the serial communications link. 


16.3 Creating Custom FORTH Definitions 

It is possible to create custom FORTH commands for the AIS1 
camera if it is found that the basic command set is not sufficient for a 
given application. This is a very simple process. 

The AIS1 camera controller contains a F68HC11 microcontroller 
from New Micros Inc located in Dallas Texas. It is a custom version of 
Motorola's standard MC68HC11A8 microcontroller which New Micros 
has had manufactured with a FORTH interpreter in the on chip ROM. 
The camera controller expects FORTH commands through the serial 
port. All communication with the camera controller during operation 
of the camera consists of ASCII text strings passed from the host 
computer to the camera. These strings are interpreted as FORTH 
commands. 

The text strings passed may create new FORTH commands by 
the normal means of adding words (functions) to the FORTH 
command dictionary. Definitions are ASCII strings of the following 
format: 

: NAME (FORTH commands) ; 

The definition begins with the receipt of the colon character. 
NAME is the name of the new definition. The FORTH commands are a 
string of ASCII text which tell the interpreter what to execute when 
the function NAME is called. The definition is terminated by the 
semi-colon character. 

For example: 

: MYWORD OPEN CLOSE READ ; 

defines a new word named MYWORD that opens the sutter, closes the 
shutter and reads the data off the CCD. All the words called in the 
FORTH commands section of the definition must already exist inthe 
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FORTH dictionary or an error message will result and the complitaion 
will be terminated. 

This rather simplistic description is intended only for the user 
who desires to create simple commands. A much more complete 
description of FORTH and FORTH definitions can be found in such 
useful refernces as : 

MAX-FORTH Reference Manual 
New Micros Inc. 

1601 Chalk Hill Road 
Dallas Texas 75212 
1-214-339-2204 

Starting FORTH 

Leo Brodie, FORTH Inc. 

Prentice-Hall, Inc. .Englewood Cliffs, N.J. 

ISBN 0-13-842930-8 

Custom words may be defined through any of the normal 
means of communication with the camera. An RS-422 terminal 
connected to the camera’s serial port for example, or an ASCII text 
file containing new definitions may be downloaded to the camrea via 
the "sendfile” program from the UNIX command line, or the "say” 
program may be used from the UNIX command line to issue a new 
definition which can fit on a single line. 

Additionally, custom FORTH words may be added to the 
camera's default dictionary by storing them in the EEPROM located 
on the controller card. This is also a very simple process and is 
described in the following section of this document. 

16.4 Saving and Restoring the FORTH Dictionary 

The FORTH dictionary may be saved at any time by the user or 
a control program by issuing the STORE command. This command 
copies the current dictionary, stored in the 68HCll's RAM memory, 
into the EEPROM memory. At startup, the contents of the EEPROM 
are copied into the RAM, returning the camera to the state it was in 
when STORE was last called. All the camera system parametrs and 
timing tables are restored along with the standard dictionary of 
FORTH commands and any commands that the user had defined 
previous to issuing the STORE command. The user is free to store 
whatever functions she would like in the EEPROM. 
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17. DSP56001 Sequencer Software 


The DSP software consists primarily of a set of routines and 
associated subroutines required to set CCD clock rail voltages and 
output amplifier operating point voltages, to shift charge on the CCD 
or CCDs, to manipulate CCD clock lines and analog processor control 
signals, and to perform analog to digital conversion of the pixel data. 
The DSP routines may be divided into three categories: System 
configuration, system test, and CCD control and pixel conversion. 

System control routines are used to set CCD clock voltages and 
output FET voltages as well as establishing format parameters for 
CCD readout. Low level functions to read and write DSP memory 
locations allow the user to directly manipulate the camera hardware. 

System test functions provide facilities for testing and debugging 
the camera system hardware. A simple test funcion is provided 
which allows the controller or host computer to test the DSP’s proper 
operation. Additional functions are provided which allow the user to 
generate specific patterns of data and or voltages at various points 
on the clock generator modules for diagnostic test. 

Charge shifting and conversion functions range in complexity 
from simple primitives such as shifting one pixel in the serial 
register to fully contained functions including clearing and readout of 
the CCD as well as “time delay integration” operation. By combining 
primitive commands the user may construct complex readout 
sequences not directly supported in the higher level operations. 

DSP operations are flexible enough to provide for a wide range 
of camera configurations. A high level command set combined with a 
set of low level commands allow for a variety of modes of interaction 
with the sequencer. The casual user may rely only on the built in 
command sequences to acquire image data, while a programmer 
familiar with the system hardware and software may access the 
hardware directly through the DSP’s low level commands to generate 
custom CCD control sequences. 

17.1 68HC11 Host Interface 

The 68HC11 passes commands to the DSP through the DSP's 
command vector register, CVR, the value written there determines 
which of the host commands will be executed. There are a total of 28 
command vectors which may be passed the first 26 correspond to 
the DSP’s normal exception processing including external interrupts, 
software interrupts, and other interrupts associated with the dsp's 
various peripherals. Through the CVR, we may force recognition of 
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any of these exceptions. Some of those are implented in ths code, in 
addition, there are 12 command vectors reserved for use by the host. 
It is through these command vectors that we normally force ecution 
of dsp routines, the routines which we may cause the dsp to execute 
include the following: 


17.2 DSP Functions 


HV# 

FUNCTION 

DESCRIPTION 

6 

say_ok 

respond to 6811 as test 
none 

7 

cam-write 

write to camera addresss 
addrdata 16 bit 

8 

cam_read 

read from camera address 

9 

volt_test 

test clock voltage dac's 

10 

cam_ctl! 

write to cam control latch 

11 

init-volts 

set cam clock voltages 
24 8 bit voltage settings 

12 

init-states 

set camera readout timing 

19 

init-format 

set readout parameters 
xx 16 bit format parameters 

20 

read 

read the ccd 
none 

21 

clear 

clear the ccd 
1 8 bit number of clears 

22 

pix-bin 

shift pixels to summing well 
1 16 bit # of pixels 

23 

row-bin 

shift rows into ser reg 
1 16 bit # of rows 

24 

pix-discard 

clear pixels in ser reg 
1 16 bit # of pixels 

25 

row-discard 

clear rows 
1 16 bit # of rows 

26 

pix-read 

read pixels 
1 16 bit # of pixels 

27 

row-read 

read rows 
1 16 bit # of rows 

30 

anti-bloom 

perform anti-blooming 


10.3 DSP Parameters 


17-2 


address . _ 


description 

x:0 

ccd_ser 

serial register length 

x:l 

bin_ser 

serial binning number 

x:2 

pre_ser 

serial register extension length 

x:3 

under_ser 

serial register underscan 

x:4 

org_ser 

serial prescan length 

x:5 

read_ser 

serial read length 

x:6 

post_ser 

serial postscan length 

x:7 

over_ser 

serial register overscan 

x:8 

ccd_par 

parallel register length 

x:9 

bin_p 

parallel binning number 

x:10 

org_par 

parallel prescan length 

x:ll 

read_par 

parallel read length 

x:12 

post_par 

parallel postscan length 

x:13 

over_par 

parallel register overscan 

x:14 

pdir_camO 

parallel shift direction for CAMO 

x:15 

pdir_caml 

parallel shift direction for CAM1 

17.4 Creating Custom DSP56001 

Software 


The programmer wishing to make changes to the DSP56001 
software may do so using the tools provided. The DSP software must 
be in its fully assembled form, that of the Motorola ".lod" file such as 
that produced by the DSP assembler. This assembler is available on 
several platforms, IBM compatable, Macintosh, and Sun workstation. 
The assembled code is stored in the 68HCll's FORTH dictionary using 
the DNLD command and may be stored in the EEPROM by issuing the 
STORE command. The DSP is initialized in its usual way by executing 
the DSP-BOOT and DSP-DUMP commands, which reset the DSP in 
bootstrap mode, and dump the code to the DSP through the host 
interface. 
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18. System Performance 
Readout noise and Gain: 


speed gain (e-/ADU) noise (e-) 

20 kHz 0.57 3.6 

10 kHz 0.21 2.5 

5 kHz 0.09 2.4 


Readout noise was affected by CCD temperature. The optimum 

performance was achieved between -60C and -100C. At lower or 

higher CCD temperature the noise increased rapidly (see graph Bias 
RMS vs Temperature). 

CTE was good at all temperatures. CTE was at least 0.99999 in 
both serial and parallel registers 

The bias and gain stability was excellent as is demonstrated in 
the graph "Bias Statility vs Time". 
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Bias RMS vs Temerature 9/15/92 
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Bias Mean vs. Temperature 9/15/92 
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Appendix A: Camera Controller FORTH Source Code 



ais57.for 


Thu, Sep 24, 1092 9:41 AM 


( COLD ) 

HEX 

100 TIE ! 

100 TIB 2+ ! 
200 DP ! 


VERSION CR CR . " AIS revision 5.7 9/18/92 “ CR ; 


* *■*•****■*■*★**■•**■★■****•*★★ 




* AIS. FOR forth code for control of the AIS ATTC A1 & camera systems 

* 

* copyright 1992 Advanced Technologies 

* Division of Photometries ltd. 


HISTORY : revision 5.7 9/18/92 

added some of the features and comments from AIS2 


revision 5.6 5/9/92 

first attempt at background exposures 
sped up the dsp response checks 
replaced "M-WAIT" with “0 MS-WAIT" 

revision 5.5 4/13/92 

fixed long standing {though unobserved} bug 
in DSP16 ! wherein large numbers were handled wrong 

revision 5.4 3/17/92 

minor changes to a variety of things 

revision 5.3 3/10/92 

Changed timer functions to interrupts. 

revision 5.2 1/10/92 

Added RTI for temp control 
New state table structure 
Complete reorganization 
No longer backward compatabile 

************************ x *************************************************** 


( * some useful constants 

0 CONSTANT FALSE 

1 CONSTANT TRUE 

( * some useful temporary storage locations 


VARIABLE TEMPO 
VARIABLE TEMPI 




{ 63HC11 Registers 

{ 

{ * declaration of constants representing 68hcll control registers and ports 
( * not all are used in this code, 

( * but all are made available for user commands 
HEX 

B0 00 CONSTANT PORTA ( * I/O PORT A DATA REGISTER 


( B002 CONSTANT PIOC 
( B003 CONSTANT PORTC 
( B0 04 CONSTANT PORTB 
( BOOS CONSTANT PORTCL 


{ * PARALLEL I/O CONTROL REGISTER 
( * I/O PORT C DATA REGISTER 
( * OUTPUT PORT B DATA REGISTER 
( * ALTERNATE LATCHED PORT C 


( B0 07 CONSTANT DDRC 
{ B0 08 CONSTANT PORTD 
{ B0 09 CONSTANT DDR D 


{ * DATA DIRECTION REGISTER FOR PORT C 
{ * I/O PORT D DATA REGISTER 
{ * DATA DIRECTION REGISTER FOR PORT D 



ais57.for 


Thu, Sep 24, 1902 9:41 AM 


2 


: 30 C A CONSTANT PORTE 
t 3CCB CONSTANT CFORC 
30 OC CONSTANT OC1M 
30 CD CONSTANT OC1D 
30 CE CONSTANT TCNT 


( 3010 CONSTANT TICi 
I 3012 CONSTANT TIC2 
; 3014 CONSTANT TIC3 


3016 

CONSTANT 

TOC1 

3018 

CONSTANT 

TOC2 

B01A 

CONSTANT 

TOC3 

B0 1C 

CONSTANT 

TOC 4 

( bo: 

LE CONSTANT TOC! 

3020 

CONSTANT 

^C^Ll 

3021 

CONSTANT 

TCTL2 

3022 

CONSTANT 

TMSK1 

3023 

CONSTANT 

TFLG1 

B0 2 4 

CONSTANT 

TMSK2 

BC25 

CONSTANT 

TFLG2 

B0 2 6 

CONSTANT 

PACTL 

B027 

CONSTANT 

PACNT 

3023 

CONSTANT 

SPCR 

3029 

CONSTANT 

SPSR 

B0 2 A 

CONSTANT 

SPDR 


{ * INPUT PORT E 
( * COMPARE FORCE REGISTER 
{ * OUTPUT COMPARE 1 ACTION MASK REGISTER 
; * OUTPUT COMPARE 1 ACTION DATA REGISTER 
• * TIMER COUNTER REGISTER 16 BIT 

( * INPUT CAPTURE 1 REGISTER 16 BIT 

{ * INPUT CAPTURE 2 REGISTER 16 BIT 

{ * INPUT CAPTURE 3 REGISTER 16 3IT 

( * OUTPUT COMPARE 1 REGISTER 16 BIT 

{ * OUTPUT COMPARE 2 REGISTER 16 BIT 

{ * OUTPUT COMPARE 3 REGISTER 16 BIT 

( * OUTPUT COMPARE 4 REGISTER 16 BIT 

( * OUTPUT COMPARE 5 REGISTER 16 BIT 
{ * TIMER CONTROL REGISTER 1 
: * TIMER CONTROL REGISTER 2 
f * timer INTERRUPT MASK REGISTER I 

( * TIMER INTERRUPT FLAG REGISTER 1 

( * TIMER INTERRUPT MASK REGISTER 2 

( * TIMER INTERRUPT FLAG REGISTER 2 

( * PULSE ACCUMULATOR CONTROL REGISTER 
( * PULSE ACCUMULATOR COUNT REGISTER 
( * SERIAL PERIPHERAL INTERFACE CONTROL REGISTER 
t * SERIAL PERIPHERAL INTERFACE STATUS REGISTER 
(' * SERIAL PERIPHERAL INTERFACE DATA REGISTER 


( 30 23 CONSTANT BAUD 
: 30 2C CONSTANT SCCR1 
( B0 2D CONSTANT SCCR2 
( B02E CONSTANT SCSR 
( BC2F CONSTANT SCDR 
B0 30 CONSTANT ADCTL 
B0 31 CONSTANT ADR1 
B0 3 2 CONSTANT ADR2 
3033 CONSTANT ADR3 
B0 3 4 CONSTANT ADR4 


i * SERIAL COMMUNICATIONS INTERFACE BAUD RATE REGISTER 

/ * SERIAL COMMUNICATIONS INTERFACE CONTROL REGISTER 1 

( * SERIAL COMMUNICATIONS INTERFACE CONTROL REGISTER 2 

{ * SERIAL COMMUNICATIONS INTERFACE STATUS REGISTER 

( * SERIAL COMMUNICATIONS INTERFACE DATA REGISTER 

( * ANALOG TO DIGITAL CONVERTER CONTROL REGISTER 
( * ANALOG TO DIGITAL CONVERTER RESULT REGISTER 1 

( * ANALOG TO DIGITAL CONVERTER RESULT REGISTER 2 

{ * ANALOG TO DIGITAL CONVERTER RESULT REGISTER 3 

{ * ANALOG TO DIGITAL CONVERTER RESULT REGISTER 4 


( E03 5 CONSTANT BPROT 


B039 CONSTANT OPTION 
( B03A CONSTANT COPRST 
{ B03B CONSTANT PPROG 
( B03C CONSTANT HPRIO 
( 30 3D CONSTANT INITREG 
B03F CONSTANT CONFIG 


* SYSTEM CONFIGURATION OPTIONS 

( * ARM/ RESET COP TIMER CIRCUITRY 
{ * INTERNAL EEPROM PROGRAMMING CONTROL REGISTER 
{ * HIGHEST PRIORITY I -BIT I NT AND MISC 
( * RAM AND I/O MAPPING REGISTER 

* COP, ROM, .AND EEPROM ENABLES 


( B7EC CONSTANT XIRQ_LINK 
( 37E9 CONSTANT IRQ_LINK 
B7E6 CONSTANT RTI_LINK 
( 37E3 CONSTANT IC1_LINK 
( B7E0 CONSTANT IC2_LINK 
( B7DD CONSTANT IC3_LINK 
( 37 DA CONSTANT OCl_LINK 
( 37 D7 CONSTANT OC2_LINK 
( 37D4 CONSTANT OC3_LINK 
B7D1 CONSTANT OC4_LINK 
( 37 CE CONSTANT OC5_LINK 
( B7CB CONSTANT TOI_LINK 
i 37CS CONSTANT PAOVI_LINK 
( 37C5 CONSTANT PAII_LINK 
( 37C2 CONSTANT SPIE_LINK 






Bit: Manipulations 


; * useful words for performing bit manipulations 

; * these words operate on the number currently on the top of the stack. 
HEX 

( * MASK-X leaves true if bit x set else false 
( : MASK-15 8000 AND ; 

; : MASK- 14 4000 AND ; 
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MASK- 12 
MASK-12 
MASK- 11 
MASK- 10 
MASK- 9 
MASK- 8 


2000 AND 
1000 AND 
0800 AND 
0400 AND 
0200 AND 
0100 AND 


MASK-7 

0080 AND 

; 

MASK-6 

0040 AND 

; 

MASK- 5 

0020 AND 

; 

MASK -4 

0010 AND 

; 

MASK-3 

0008 AND 

; 

MASK-2 

0004 AND 

; 

MASK-1 

0002 AND 

; 

MASK-0 

0001 AND 

; 

* T-X makes certain 

bit 

: T-15 

8000 OR ; 


: T-14 

4000 OR ; 


: T-13 

2000 OR ; 


: T-12 

1000 OR ; 


: T-ll 

0800 OR ; 


: T-10 

0400 OR ; 


: T-9 

0200 OR ; 


: T-8 

0100 OR ; 


T-7 

0030 OR ; 


T-6 

0040 OR ; 


T-5 

0020 OR ; 


T-4 

0010 OR ; 


T-3 

0008 OR ; 


T-2 

0004 OR ; 


T-l 

0002 OR ; 


T-0 

0001 OR ; 


* F-X makes certain 

bit 

: F-15 

7FFF AND 

; 

: F-14 

BFFF AND 

; 

: F-13 

DFFF AND 

; 

: F-12 

EFFF AND 

; 

: F-ll 

F7FF AND 

; 

: F-10 

FBFF AND 

; 

: F-9 

FDFF AND 

; 

: F-8 

FEFF AND 

; 

F-7 

FF7F AND ; 


F-6 

FFBF AND ; 


F-5 

FFDF AND ; 


F-4 

FFEF AND ; 


F-3 

FFF7 AND ; 


F-2 

FFFB AND ; 


F-l 

FFFD AND ; 


F-0 

FFFE AND ; 



x is true regardless of current state 


^ * *****x********** , »**********************************************'*'*'*'**'****'******) 

( 

( EEPROM Memory 

( 

( 

( * the following words deal with the off chip EEPROM 
( * where we store the default system dictionary 
( * eeprot and eeunprot are used to write protect the EEPROM 
( * there are some funny numbers in here which are hard coded 
( * and assume that the eeprom starts at $6000, which it does 
( * right at the moment. 

( * the addresses we want to write to, from the chips point 
( * of view, are $5555 and $2 AAA. these addresses are not 
( * available for our EEPROM, but the bottom 14 bits must be 
( * representing these addresses, so we will set the top bit 
( * which the eeprom does not even see and write to it at 
( * $D555 and $AAAA . 


HEX 
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CE 

c, 

D5 

c. 

55 C, 

( * 

LDX 

#$D555 

1ST EPROM ADDRESS 

36 

c. 

AA 

Q 


( * 

LDAA 

#$AA 

1ST DATA PATTERN 

A7 

c , 

00 

c. 


( * 

STAA 

0,X 

SEND AN AA TO $5555 

CE 

c, 

AA 

c. 

AA C, 

( * 

LDX 

#$AAAA 

2ND EPROM ADDRESS 

86 

c, 

55 

c. 


( * 

LDAA 

#$55 

2ND DATA PATTERN 

A7 

c 

00 

c, 


( * 

STAA 

0,X 

SEND A 55 TO $2AAA 

CE 

n 

D5 

c, 

55 C, 

( * 

LDX 

#$D555 

3RD EPROM ADDRESS 

36 

Q 

A0 

c. 


( * 

LDAA 

#$A0 

3RD DATA PATTERN 


Q 

00 

c , 


{ * 

STAA 

0,X 

SEND AN A0 TO $5555 

29 

c. 




{ * 

RTS 


RETURN 


CODE -SUB EEUNPROT 


CE 

n 

D5 C, 

55 C, 

( * 

LDX 

#$D555 

1ST EPROM ADDRESS 

36 

C , 

AA C, 


( * 

LDAA 

#$AA 

1ST DATA PATTERN 

A7 


00 C, 


( * 

STAA 

0,X 

SEND AN AA TO SD555 

CE 

c , 

AA C, 

AA C, 

{ * 

LDX 

#$AAAA 

2ND EPROM ADDRESS 

36 

r* 

55 C, 


( * 

LDAA 

#$55 

2ND DATA PATTERN 

A7 

c. 

00 C, 


( * 

STAA 

0,X 

SEND A 55 TO SAAAA 

CE 

r* 

D5 C, 

55 C, 

{ * 

LDX 

#$D555 

3RD EPROM ADDRESS 

86 

C , 

80 C, 


( * 

LDAA 

#$80 

3RD DATA PATTERN 

A7 

c. 

00 C, 


( * 

STAA 

0,X 

SEND AN 80 TO $D555 

CE 

r* 

D5 C, 

55 C, 

( * 

LDX 

#$D555 

4TH EPROM ADDRESS 

86 

n 

AA C, 


( * 

LDAA 

#$AA 

4TH DATA PATTERN 

A7 

c. 

00 C, 


( * 

STAA 

0,X 

SEND AN AA TO $D555 

CE 

c, 

AA C, 

AA C, 

( * 

LDX 

#$AAAA 

5TH EPROM ADDRESS 

86 

C, 

55 C, 


( * 

LDAA 

#$55 

5TH DATA PATTERN 

A7 

c. 

00 C, 


( * 

STAA 

0,X 

SEND A 55 TO $AAAA 

CE 

c. 

D5 C, 

55 C, 

( * 

LDX 

#$D555 

5TH EPROM ADDRESS 

36 

c. 

20 C, 


( * 

LDAA 

#$20 

6TH DATA PATTERN 

A7 

c. 

00 C, 


( * 

STAA 

0,X 

SEND A 20 TO $D555 

39 

c. 



( * 

RTS 


RETURN 


END-CODE 


( EPROM represents where in EEPROM to start storing the dictionary ) 
( we want to reserve some space for autostart routines etc. so we 
( start at 256 bytes above the actual start of the EEPRCM or $6100 ) 


6000 CONSTANT EPROM 

6104 CONSTANT EEDICT-START 

200 CONSTANT DICT-START 

: EE- ! 2DUP * BEGIN 2DUP @ = UNTIL DROP DROP ; 

: EE-C! 2DUP C! BEGIN 2DUP C@ = UNTIL DROP DROP ; 

( the forth dictionary is stored in eeprom memory, but is run out ) 
( of ram. at any time the user may use the following word ''store'*) 
( to move the current dictionary to eeprom. this in and of itself ) 
( is not all that useful, the next word "restore" will move the 
( dictionary from eeprom to ram, and restore the state of the 
{ forth system to exactly where you were when you issued the store) 
{ command, this is also of limited use, because next time you 
( power up the system, restore is not available m ram to to be. 

( called, another word, "astart!" defined at the end of this file) 
( is used to tell the 6811 what word we would like executed on the) 
{ next restart, "restore" can be used as the autostart routine. 

( other words which include restore may also be defined as auto- 
( start words, but the routine name is hard coded and this file 
( would have to be edited, a detailed discussion of the whole 
( autostart process can be found mthe new micros manuals. 


{ STORE store the current state of the forth machine 
( and the user dictionary to external EEPROM 

VARIABLE PROMLOC 
VARIABLE PROMCOUNT 

HEX 

: STORE 

0 PROMCOUNT ! 

EEUNPROT 
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EPROM 100 f PROMLOC ! 

HERE PROMLOC @ EE- ! 
PROMLOC £2 + PROMLOC ! 
DICT-START PROMLOC @ EE- ! 
PROMLOC @ 2+ PROMLOC ! 


CR . " storing user dictionary ... " CR 

HERE DICT-START DO 
I CO DUP PROMLOC 0 CO = IF DROP 

ELSE PROMLOC 0 EE-C! PROMCOUNT 0 1+ PROMCOUNT S 
THEN 

PROMLOC 01+ PROMLOC ! 

LOOP 

. " storing FORTH variables ... " CR 


84 6 DO 

I CO PROMLOC 0 EE-C! 

PROMLOC 01+ PROMLOC ! 

LOOP 

EEPROT 

CR . " store complete. “ CR 
. ” dictionary length: " HERE 200 - -J. CR 
. " bytes updated: “ PROMCOUNT 0 U. CR 

EEPROT ; 


HEX 

: RESTOR 


( 


HEX 

CR . " restoring user dictionary " CR 
6104 ( * START ADDR. OF DICTONARY IN EEPROM 

200 ( * START ADDR. OF DICTIONARY IN RAM 

6100 0 6102 0 ( * GET END AND START OF RAM DICT 

{ * SUBTRACT TO GET DICTIONARY LENGTH 

CMOVE { * MOVE DICTIONARY 


{ 


. " restoring FORTH variables " CR 
6100 @ { * GET THE RAM DICTIONARY END ADDRESS 

6102 @ ( * GET THE RAM DICTIONARY START ADDRESS 

{ * NOW WE'VE GOT THE DICT LENGTH 

6104 + { * + EEDICT OFFSET = ADDR OF USER AREA IN EEPROM 

6 84 CMOVE ( * MOVE USER AREA 


CR . " restore complete " CR 
VERSION CR 


( ****** ***************************************************** ********* 

( 

( FORTH Dictionary Manipulation 

( 

( 

( these words allow to cut or bridge the dictionary, they will return 
( an address and data, if this data is stored under the address, the 
( dictionary will recover to the original form 

( CUT-DICT must be called with the name’s compilation address of the 
( first word to be cut off. Attention: also the forth words will not be 
( accessible anymore. 

( To cut all words below TEST: ' TEST CUT 

{ A this is the TICK 

: CUT-DICT 2- DUP CR ." ADDRESS: " . DUP @ . “ DATA: ” . 0 SWAP ! ; 


( BRIDGE-DICT is similar to CUT-DICT except it allows to continue 
( the dictionary at any point. This can be used to disable access 
( to a set of words 

( ' WORD 2 ' WORD1 BRIDGE-DICT disables ail words below WORD2 including WORD1 . 
( A A -these are TICKS 

( Attention: make sure WORD2 is higher in the wordlist {further 
{ away from TASK} than WORD1 
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: 3RI3GE-DICT 3- & SWAP 2- DUP CR . " .ADDRESS: " . DU? s DATA: ” . ! ; 


t******-**-*-**--****-** 






Analog To Digital Converter 

the 6 Shell includes an 3 channel, multiplexed input successive 
approximation analog to digital converter with sample and hold, 
each conversion is accomplished in 32 e clock cycles, or about 
16 usee, the converter has two modes of operation, single cnannel 
mode or multiplexed input mode, in each of these modes the ^ system 
has two modes of operation: single cycle or scanning, in single 
cycle mode a single conversion cycie is periormed weaving four 
results, in scanning mode the converter performs continously, 
overwriting the data in adrl with data from the fifth conversion, 
and the data in the second with results from the sixth, and so on. 

not el : in either mode a conversion cycle consists of four 
conversions, in single channel mode tns means that 
four conversions will be pertermed on the input 
channel before the conversion complete flag will be 
set, with results being stored in adrl-adr4 . 

noted : any writes to the control register, adctl, will 
initiate a conversion cycle, writing to adctl is 
the only way to initiate a conversion, all words 
below which end with "adctl c!" actually start a 
conversion cycle. 

note3 : to use the aac the adpu bit in the option register 
must be set. it usually is. to check it use the 
forth word adc-on? defined below, and the word 
adc-cn to turn it on if its not. 


{ : ADC-ON? 

OPTION C@ MASK-7 ; 

{ : ADC-ON 
( 

OPTION C3 T-7 OPTION C! 
1 0 MS-WAIT ; 

( : ADC-OFF 

OPTION C@ F-7 OPTION C! 

( : SET-SCAN 
: SET-NOSCAN 

ADCTL C<3 T-5 ADCTL C! 
ADCTL C@ F-5 ADCTL C! ; 

: SET-SINGLE 

ADCTL C( 2 F-4 ADCTL C! ; 

: SET-CHO 
: SET -CHI 
: SET-CH2 
: SET-CH3 
( : SET-CH4 
( : SET-CH5 
( : SET-CH6 
( : SET-CH7 

SET-SINGLE ADCTL C(2 F-0 
SET-SINGLE ADCTL C<2 T-0 
SET-SINGLE ADCTL C@ F-0 
SET-SINGLE ADCTL C@ T-0 
SET-SINGLE ADCTL C® F- 
SET-SINGLE ADCTL C@ T- 
SET-SINGLE ADCTL C@ F- 
SET-SINGLE ADCTL C@ T- 

( : SET -MULT 

ADCTL C3 7-4 ADCTL Ci 

( : SET-GFP1 
{ : SET-GFPi: 

SET -MULT ADCTL C3 F-3 


( * true if analog to digital converter 

* system is turned on, false otherwise 

( * turns converter on. 

( * a 100 usee delay is required 

* before using the converter. 


{ * set continuous conversions 
* set single conversion cycle 


* SETS SINGLE CHANNEL MODE 

-1 F-2 F-3 ADCTL C! ; 

-1 F-2 F-3 ADCTL C! ; 

-1 F-2 F-3 ADCTL C! ; 

-1 F-2 F-3 ADCTL C! ; 

F-l F-2 T-3 ADCTL C! ; 

F-l F-2 T-3 ADCTL C! ; 

T-l F-2 T-3 ADCTL C! ; 

T-l F-2 T-3 ADCTL C! ; 

t •* ?T=?S ADC IN MNLTTPLENE^ Zl'&TT 

'-2 ADCTL C! ; ' * USE INPUT GROUP!, CHO-3 
At-CTL Cl ■ " USE INPUT GFQUP2, CK4-7 


ADC -DONE? ADCTL CM MASK- ' 


TRUE IF A CONVERSION SFOUENCE IS COMPLETE 
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( FETCH THE RESULTS OF THE CONVERSION) 

: ADR1® BEGIN ADC-DONE? UNTIL ADR1 C® ; 

: ADR2(i BEGIN ADC-DONE? UNTIL ADR2 C® ; 

: ADR3® BEGIN ADC-DONE? UNTIL ADR3 C® ; 

: ADR4® BEGIN ADC-DONE? UNTIL ADR4 C@ ; 

: 4ADC(i BEGIN .ADC-DONE? UNTIL 

ADR1 C® ADR2 C® ADR3 C® ADR4 C@ 


DECIMAL 

{ TEMP® expects a number from 0 - 3 on the 


* 

FETCH 

#1 

* 

FETCH 

#2 

* 

FETCH 

#3 

* 

FETCH 

#4 

* 

FETCH 

THEM ALL 


and measures that temperature channel ) 


: TEMP® SET-NOSCAN SET-SINGLE { no continuous conversions, one channel only 


DUP 

0 = IF 

SET-CHO 

THEN 

DUP 

1 = IF 

SET-CHI 

THEN 

DUP 

2 = IF 

SET-CH2 

THEN 

DUP 

3 = IF 

SET-CH3 

THEN 


4ADC® 

+ 

SWAP ROT 


+ 

4 / 
200 - 


{ get all 4 results 
{ add top two results 
{ get other two on top 
( add those two 
( add the results 
( average them 
( account for offset 


SWAP 
DUP 0 
DUP 1 
DUP 2 


= IF 

CR 

. " CHANNEL 

0 

TEMPERATURE = 

THEN 

= IF 

CR 

. " CHANNEL 

1 

TEMPERATURE = 

THEN 

= IF 

CR 

. " CHANNEL 

2 

TEMPERATURE = ' 

' THEN 

= IF 

CR 

. “ CHANNEL 

3 

TEMPERATURE = ' 

' THEN 


DEG C " ; 


TEMPO® 

0 

TEMP® 

TEMPI® 

1 

TEMP® 

TEMP2® 

2 

TEMP® 

TEMP3® 

3 

TEMP® 


( **************************★******★***★***********★*********★*****************) 

( 

( TIMER ROUTINES 

( a variable TIME is incremented every millisecond by an interrupt routine. 

{ functions which want to wait a given number of milliseconds simply poll this 
{ variable until it is equal to ar greater than the desired stop time. 

{ this makes it a lot more accurate, as well as making it a lot simpler to 
( perfrm other tasks during this time. We are no longer so busy polling the 
( timer directly that we have no time for anything else. 


2 VAR I ABLE TIME { continuoulsy updated millisecond timer ) 


( assembler routines to fetch and store the time are required to avoid collisions 
{ with the timer routine itself, without interrupting it significantly. 

HEX 

CODE-SUB TIME® 

OF C, ( SEI 

FC C, TIME 2+ , { LDD TIME+2 

18 C, 09 C, ( DEY 
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END-CODE 


18 C, 09 C, 

( 

DEY 


13 C, ED C, 00 

C, ( 

STD 

0 , Y 

FC C, TIME , 

f 

LDD 

TIME 

13 C, 09 C, 

i 

DEY 


IS C, 09 C, 

/ 

DEY 


13 C, ED C, 00 

c, ( 

STD 

0 , Y 

0E C, 


CLI 


29 C, 

( 

RTS 


TIME ! 




OF C, 

( 

SEI 


18 C, EC C, 00 

c, ( 

LDD 

0 , Y 

18 C, 08 C, 

{ 

INY 


IS C, 08 C, 

{ 

INY 


FD C, TIME , 

( 

STD 

TIME 

18 C, EC C, 00 

' C, ( 

LDD 

0 , Y 

18 C, 08 C, 

( 

INY 


18 C, 08 C, 

( 

INY 


FD C, TIME 2+ 

t 

STD 

TIME+2 

0E C, 

( 

CLI 


39 C, 

{ 

RTS 



END -CODE 


( -oil owing are used by the exposure routines defined near the ©nd oj. this file. 

( they" are defined here so as to be accessable to the timer routine immediatley below. 


2 VARIABLE EXP_LEFT 
VARIABLE EXPOSING 


( assembler routines to fetch and store EXP_LEFT are requireato avoid collisions 
( with the timer routine itself, without interrupting it significantly. 

HEX 


CODE -SUB EXP LEFT@ 


OF C, 
FC C, 
18 C, 
18 C, 
18 C, 
FC C, 
18 C, 
18 C, 
18 C, 
OE C, 
39 C, 

END-CODE 


EXP LEFT 

2 + 

09 C, 


09 C, 


ED C, 00 

C, 

SXP_LEFT 

, 

09 C, 


09 C, 


ED C, 00 

C, 


( 

( 


SEI 

LDD EXP_LEFT+ 2 

DEY 

DEY 

STD 0 , Y 

LDD EXP_LEFT 

DEY 

DEY 

STD 0 , Y 

CLI 

RTS 


CODE-SUB EXP LEFT! 


OF C, 
18 C, 
18 C, 
18 C, 
FD C, 
18 C, 
18 C, 
18 C, 
FD C, 
OE C, 
39 C, 

END-CODE 


( 


EC C, 00 C, ( 
08 C, ( 
08 C, { 
EXP_LEFT , { 


SC C, 00 C, { 

08 C, { 

08 C, ( 

EXP_LEFT 2+ , ( 

( 
( 


SEI 

LDD 0 , Y 

INY 

INY 

STD EXP_LEFT 
LDD 0, Y 
INY 
INY 

STD EXP_LEFT+2 

CLI 

RTS 


{ all this routine needs to do is increment the time and set the next interrupt 
( to occur one millisecond rrom now. Someday soon we might want to check if it s 
( time to oerform housekeeping tasks and do some safety checks. Is the backplate 
( too hot?" Is the CCD too cold? or too hot?? Stuff like that. 
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( now we're attempting to do background exposures by decrementing a counter in this 
( interrupt service routine. We can check it at any time to see if the exposure is 
( done, we can do other things while the exposure proceeds. 

( we are using the output compare number 4 because 1 is reserved for other uses in the 
( 6811, and the pins associated with oc2 and oc3 are used for shutter control. 


HEX 

CODE 


?IMER 


OF 

c. 

{ sei 

* 

disable other interrupts 

36 

C, 10 c. 

( Idaa 

#$10 


B7 

C, TFLG1 , 

( staa 

tflgl * 

clear interrupt flag 

FC 

C, TIME 2+ , 

( ldd 

time+2 * 

fetch the lower half of time 

C3 

C, 1 , 

( addd 

#1 * 

increment it. 

FD 

C, TIME 2+ , 

( std 

time+2 * 

store it. 

24 

C, 09 C, 

( bcc 

nocarry * 

if it didn't overflow, then don 

FC 

C, TIME , 

( ldd 

time * 

fetch the upper half 

C3 

C, 0001 , 

( addd 

#1 * 

increment it. 

FD 

C, TIME # 

( std 

time * 

and store it. 



( nocarry 

* 

just continue. 

FC 

C, TOC 4 , 

{ ldd 

toc4 * 

fetch the last compare value 

C3 

C, 07D0 , 

( addd 

#2000 * 

add 2000 to it 

FD 

C, TOC 4 , 

( std 

toc4 * 

store as next compare value 

B6 

C, EXPOSING 1+ , 

( ldaa 

EXPOSING 

* fetch exposure flag 

27 

C, 14 C, 

( beq 

nexp 

* if not exposing leave 

FC 

C, EXP_LEFT 2+ , 

( ldd 

expleft+2 

* fetch lower half of counter 

83 

C, 1 , 

( subd 

#1 

* subtract one from it 

FD 

C, EXP_LEFT 2+ , 

( std 

expleft+2 

* store it 

24 

C, 09 C, 

( bcc 

nexp 

* if no borrow, then don't 

FC 

C, EXP_LEFT , 

( ldd 

exp_left 

* fetch top half 

S3 

C, 1 , 

( subd 

#1 

* decrement it 

FD 

C, EXP_LEFT , 

( STD 

EXP_LEFT 

* and store it 



( nexp 



FC 

C, EXP_LEFT , 

{ ldd 

exp_left 

* If top half of exp left 

26 

C, 0E C, 

( bne 

not_done 

* is not equal to zero. 

FC 

C, EXP_LEFT 2+ , 

{ ldd 

exp_left+2 

* or the bottom half is not. 

26 

C, 09 C, 

( bne 

not_done 

* were not done. 



( 


* If we are done. 

7F 

C, EXPOSING 1+ , 

( clr 

exposing 

* clear exposure flag. 

CE 

C, PORTA , 

( Idx 

#porta 

* point at port A 

ID 

C, 0 C, 60 C, 

( bclr 

0, x #$60 

* and close the shutters. 



( not_dcne 



0E 

C, 

{ cli 


* enable other interrupts 

3B 

C, 

{ rti 


* and leave. 


END-CODE 


( install the jump to our TIMER function at the appropriate address ) 
HEX 


CODE -SUB CLEAR-CC -MASKS 
86 C, 00 C, { 

06 C, { 

39 C, ( 

END-CODE 


LDAA #0 ) 
TAP } 

RTS ) 


: STOP-TIMER 0 TMSK1 C! { TURN OFF THE INTERRUPT ) 

0 TCTL1 C! ( STOP THE COMPARE OUTPUT ON PA4 ) ; 


INSTALL-TIMER 

STOP-TIMER 

7E DUP OC4_LINK C@ = IF 
[ 1 TIMER @ x FF AND ] 
DUP OC4_LINK 1+ C@ = IF 
[ ' TIMER @ FF AND ] 
DUP OC4_LINK 2+ C@ = IF 


DROP ELSE OC4_LINK 
LITERAL 

DROP ELSE OC4_LINK 
LITERAL 

DROP ELSE OC4_LINK 


EEC! THEN 
1+ EEC! THEN 
2+ EEC! THEN ; 
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: INIT-TIMER 
STOP-TIMER 
CLEAR -CC -MASKS 
0 0 TIME! 

8000 TCC4 ! 
04 TCTL1 C! 
30 0C1M C! 
30 QC1D C! 
?F TFLG1 C! 


( ZERO THE TIME VARAIBLE ) 

( START WITH COMPARE AT TCNT = $8000 ) 
( SET TO TOGGLE PA4 ON EACH COMPARE ) 

( OUTPUT COMPARE 1 DOES NOTHING ) 

( CLEAR ANY AND ALL COMPARE FLAGS ) 


: START-TIMER 

STOP-TIMER 

INIT-TIMER 

10 TMSK1 C! ; ( ENABLE THE INTERRUPT ) 


Time Measurement 


■ MS-WAIT expects a 32 bit number on the stack. 

( It waits that many milliseconds. 

: MS-WAIT { D - ) 

2DUP 0= SWAP 0= AND NOT 

IF TIME® D+ BEGIN 2DUP TIME® DU< UNTIL 

THEN 2 DROP 


( M-WAIT expects a 16 BIT number on the stack, 
it waits that many milliseconds. 

: M-WAIT ( W - i 

0 MS -WAIT ; 


TEMPERATURE CONTROL LOOP SOFTWARE 


( the general scheme is as follows . . . 

( a real time interrupt is intiated which interrupts the 6811 every 32.77 ms 
( each time the interrupt is received, the 6811 fetches and increments the 
( trnp_cnt variable storing the result and comparing it to the max_tmp_cnt 
( variable, if less than, the 6811 simply returns, if equal or greater, which 
( should not occur, the 6811 checks the temperature against the desired temp. 

{ if less than desired, the 6811 fetches the heater value and increments it. if 
( the measured temp is greater than the desired, the 6811 decrements the heater value. 
( if the measured temp equals the desired, no action is taken. 

HEX 

( actual temp, most recently measured temperature 
( desired temperature 
( temperature loop counter 

{ how many times to loop before checking tempreature 
( value most recently written to the temp control DAC 
( value to add or subtract from dac_val when nec. 

( location of temperature control DAC 


VARIABLE ACT_TMP 
VARIABLE DES_TMP 
VARIABLE TMP_CNT 
VARIABLE MAX_CNT 
VARIABLE DAC_VAL 
VARIABLE DAC_INC 
B200 CONSTANT TMP_DAC 


OF 


36 C, 
4C C, 


■SUB TEMP- 

-CTL 




mask other interrupts 

40 C, 

( 

( 

sei 

Idaa 

#$40 

* 

B025 , 

( 

staa 

$b025 

* 

clear RTI flag 

TMP__CNT 

1+ , ( 

ldaa 

tmp_cnt 

* 

fetch current count into acc 


( 

inca 


★ 

increment it 

TMP_CNT 

1+ , ( 

staa 

tmp_cnt 

•k 

and store a copy in tmp_cnt 

MAX CNT 

1+ , ( 

crrpa 

max_cnt 

* 

then compare to max count 

70 C, 

( 

bio 

exit 

★ 

if max > current, exit 
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4F 

Q 



{ clra 


* 

zero accumulator a 

B7 

c, 

TMP_CNT 

1+ / 

( staa 

tmp_.cn t 

* 

and reset counter 

B6 

c, 

BO 3 9 , 


( ldaa 

$b039 

* 

get option register into acca 

84 

c, 

BF C, 


( anda 

#$bf 

* 

make sure csel bit is clear 

8A 

c. 

80 C, 


( oraa 

#$80 

* 

make sure adpu bit is set 

B7 

c, 

B03 9 , 


( staa 

$b039 

* 

store that control register 

86 

c, 

02 C, 


{ ldaa 

#2 



B7 

c, 

B030 , 


( staa 

$b030 

★ 

start 4 conversions on channel two 





{ adwait 




B6 

c. 

B03 0 , 


( ldaa 

$b030 

* 

get adc control reg into acc a 

84 

c. 

80 C, 


{ anda 

#$80 

* 

conversion complete? 

27 

c. 

F9 C, 


( beq 

adwait 

■x 

if not set, go check again 

18 

c. 

3C C, 


( pshy 


X 

push y onto stack 

18 

c. 

CE C, 0 


{ ldy 

#0 

X 

clear reg y 

F6 

c. 

B03 1 , 


( Idab 

$b031 

X 

get 1st adc result 

18 

c, 

3A C, 


( aby 


x 

add b to y 

F6 

c. 

B0 3 2 , 


{ ldab 

$b032 

X 

get 2nd adc result 

18 

c. 

3A C, 


( aby 


* 

add b to y 

F6 

c. 

B0 3 3 , 


( ldab 

$b033 


get 3rd adc result 

18 

c, 

3A C, 


( aby 


* 

add b to y 

F6 

c, 

B0 3 4 , 


( ldab 

$b034 

X 

get 4th adc result 

18 

c. 

3A C, 


( aby 


X 

add b to y 

IS 

c , 

3F C, 


( xgdy 


X 

move y to double acc 

18 

c. 

38 C, 


( puly 


X 

restore reg y 

04 

c. 



( lsrd 


X 

divide acc by 2 

04 

c. 



( lsrd 


X 

divide by 2 again, accd = avg 

F7 

c. 

ACT_TMP 

1+ , 

( stab 

act_tmp 

X 

store as current temperature 

FI 

c. 

DES TMP 

1+ , 

( empb 

des_tmp 

* 

compare to desired 

27 

c. 

2E C, 


( beq 

exit 

X 

if the temp is right, just leave 

22 

c. 

16 C, 


( bhi 

its_hi 

X 

if actual > desired, it's too high 


* if the temperature is too low and the current dac setting 

* is more than ff - dac_inc, then set the dac to $ff. 

( its_lo 


86 

c. 

FF C, 

( 

ldaa 

#$ff 

B0 

c, 

DAC_INC 

1+ , ( 

suba 

dac_inc 

B1 

c, 

DAC_VAL 

1+ , ( 

empa 

dac_val 

n n 

Zj <Li 

c. 

04 C, 

( 

bhi 

inc it 

86 

c, 

FF C, 

{ 

ldaa 

#$ff 

20 

c, 

18 C, 

{ 

bra 

store_it 


* if current dac veal is less than 

* increment the dac_val by dac_inc 


ff - dac_inc 


if dac_val < {ff - dac_inc} , increment 

otherwise, set dac__val to $ff 

then 


B6 C, DAC_VAL 1+ 
BB C, DAC_INC 1+ 
20 C, 10 C, 


{ inc_it 

{ ldaa dac_val 

( adda dac_inc 

( bra store_it 


* get current dac value 

* increment dac_val by dac_inc 

* store it and leave 


if the temperature is too high and the current dac setting 
is greater than increment value, then decrement dac val 
by increment value, otherwise decrement by one. 


B6 C, 
27 c, 
B1 C, 

a') p 

4A C, 
20 C, 


DAC_VAL 1+ 
11 C, 

DAC_INC 1-f 
03 C, 

03 C, 


B0 C, DAC_INC 1+ , 


B7 C, DAC_VAL 1+ , 


( its_hi 
( ldaa 

( beq 

( empa 

( bhi 

( deca 

( bra 

( dec_lots 
( suba 

{ store_.it 
( staa 


dac_val 

exit 

dac_inc 

dec_lots 

store_it 


dac_inc 


dac_val 


* if dac_val = 0, just leave 

* if dac_val > dac_inc 

* ... dec dac_val by dac_inc 

* decrement by one 

* store it and leave 


decrement dac_val by dac_inc 


* store the value for future reference 
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B7 C, TMP_DAC 1+ , 

CE C, 

3B C, 

END -CODE 


; staa tmp_dac * writs it to the dac 

f 

( exit cli * unmask interrupts 

( rti 

{ end of TEMP-CTL definition ) 


DECIMAL 
: I NIT -TEMP 


0 ACT_7MP 
0 DACJ/AL 


150 DES_TMP ! 0 TMP_CNT ! 5 MAX_CNT ! 
10 DAC_INC ! 0 TMP_DAC ! ; 


HEX 

( the address to which the 6811 will jump when it gets the interrupt ) 
| install the jump to our function at that address ) 


: STOP-TEMP-CTL 

TMSK2 C0 F-o TMSK2 C! ; 

: START -TEMP-CTL 
STOP-TEMP-CTL 
CLEAR-CC-MASKS 
INIT-TEMP 

PACTL C0 T-l T-0 PACTL C! ( set rti to 32.77 milliseconds ) 

TMSK2 C0 T-6 TMSK2 C! ( enable the interrupt } 


: INSTALL -TEMP-CTL 

STOP-TEMP-CTL 

STOP-TIMER 

7E DUP RTI_LINK C0 = IF DROP ELSE RTI_LINK EEC! THEN 
[ ' TEMP-CTL 0 x FF AND ] LITERAL 

DUP RTI_LINK 1+ C0 = IF DROP ELSE RTI_LINK 1+ EEC! THEN 
[ ‘ TEMP-CTL 0 FF AND ] LITERAL 

DUP RTI_LINK 2+ C0 = IF DROP ELSE RTI_LINK 2+ EEC! THEN 


DECIMAL 


( : CHK-TMP ACT_TMP @ 200 - . " TEMP = " . . " DEG C " CR ; 

( : WATCH -TMP BEGIN CHK-TMP 2000 0 MS-WAIT ? TERMINAL UNTIL ; 


( : CHK-CNT TMP_CNT 0 U. CR ; 

( : WATCH -CNT BEGIN CHK-CNT 2000 0 MS -WAIT 7TERMINAL UNTIL ; 


( : CHK-DAC DACJ/AL 0 U. CR ; 

( : WATCH-DAC BEGIN CHK-DAC 2000 0 MS-WAIT 7TERMINAL UNTIL ; 


( : CHK-RTI 

t 

\ 

( 

( 


CR 

ACT_TMP 0 
DES__TMP 0 
TMP_CNT 0 
MAX_CNT 0 
DACJ/AL 0 


ACT_TMP = 
DES_TMP = 
TMP_CNT = 
MAX_CNT = 
DACJ/AL = 


u. 

CR 

u. 

CR 

u. 

CR 

u. 

CR 

u. 

CR 


: TEMP! 200 + DESJTMP ! ; 


: TEMP? ACT_TMP 0 200 - . CR ; 

: CCD-TEMP? ACTJTMP 0 200 - . " CCD temperature = " . . " deg C" CR ; 


: TEMP-DIFF? 


DES_TMP 0 ACT_TMP 0 - U. CR ; 



ats57.for 


Thu, Sap 24, 1992 9:41 AM 


I * ********************************************************************* 

( DSP RELATED FUNCTIONS 

( DEFINITIONS OF CONSTANTS REPRESENTING DSP HOST PORT LOCATIONS 


HEX 


cooo 

CONSTANT 

ICR 

C001 

CONSTANT 

CVR 

C002 

CONSTANT 

ISR 

C003 

CONSTANT 

IVR 

{ * C004 NOT USED 

C005 

CONSTANT 

RXH 

C006 

CONSTANT 

RXM 

C007 

CONSTANT 

RXL 

C005 

CONSTANT 

TXH 

C006 

CONSTANT 

TXM 

C007 

CONSTANT 

TXL 


( * INTERRUPT CONTROL REGISTER 
( * COMMAND VECTOR REGISTER 
( * INTERRUPT STATUS REGISTER 
( * INTERRUPT VECTOR REGISTER 

{ * RECEIVE REGISTER HIGH BYTE 
( * RECEIVE REGISTER MIDDLE BYTE 
( * RECEIVE REGISTER LOW BYTE 

( * TRANSMIT REGISTER HIGH BYTE 
( * TRANSMIT REGISTER MIDDLE BYTE 
{ * TRANSMIT REGISTER LOW BYTE 


{ * SHOW-REGS simply fetches and prints the values in the DSP registers 
( this is useful for debugging, but serves no real purpose 

( : SHOW-REGS 


CR 

ICR 

C@ 

. - ICR = " 

CR 

ISR 

C@ 

ISR = * 

CR 

CVR 

C@ 

CVR = - 

CR 

RXH 

C@ 

. " RXH = " 

. CR 

RXM 

C@ 

. - RXM = " 

. CR 

RXL 

C£ 

. " RXL = " 

. CR 


( DSPCTL IS THE DSP CONTROL LATCH WHICH THE 6811 MAY WRITE TO IN ORDER 
( TO AFFECT THE DSP'S OPERATION. 


Cl 00 CONSTANT DSPCTL 


{ : DSP-RESET 
{ FE DSPCTL C! 

( FF DSPCTL C! ; 

{ : DSP-IRQA 

{ FB DSPCTL C! 

( FF DSPCTL C! ; 

( 

( : DSP-IRQB 
( FD DSPCTL C! 

( FF DSPCTL C! ; 

( 

: DSP -BOOT 

FF DSPCTL C! 

FC DSPCTL C! 

FD DSPCTL Cl 
FF DSPCTL C! ; 


( * DSP RESET LINE LOW 
( * DSP RESET LINE HIGH 


( * IRQA LOW 
( * IRQA HIGH 


( * IRQB LOW 
( * IRQB HIGH 


( * EVERYTHING HIGH 
( * DSP RESET LOW IRQB LOW 

( * DSP RESET HIGH IRQB LOW 

( * DSP RESET HIGH IRQB HIGH 


CLR-TXH-TXM 00 DUP TXH 


TXM C! 


ROUTINES FOR INTERPRETING THE HOST REGISTERS 


RXDF? ISR C@ MASK-0 ; 

TXDE? ISR C@ MASK-1 ; 

HF2? ISR C@ MASK-3 ; 

HF3? ISR C@ MASK-4 ; 

HREQ? ISR C@ MASK-7 ; 

T-HFO ICR C@ T-3 ICR C! 

F-HFO ICR C@ F-3 ICR C! 


{ * LEAVES TRUE IF RXDF BIT SET 
{ * LEAVES TRUE IF TXDE BIT SET 
( * TRUE IF HF2 SET 
( * TRUE IF HF3 SET 
( * TRUE IF DSP IS ASSERTING HREQ 
( * SETS HFO TO TRUE 
( * SETS HFO TO FALSE 
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: T-HF1 ICR T-4 ICR C! ; ( * SETS HF1 TO TRUE 

: F-HF1 ICR C@ F-4 ICR C! ; { * SETS HF1 TO FALSE 


•: when the DSP is executing a host command, it sets hf2 in the I SR to a 1 } 

! DSP-BUSY checks that flag 
: DSP-BUSY? I SR C@ MASK-3 ; 

: DSP-WAIT waits until the DSP is no longer busy ) 

: DSP-WAIT BEGIN ISR C@ MASK-3 0= UNTIL ; 


VARIABLE DSP_CK 

: HV! ( VECTOR# - ) 

DUP 20 < IF T-7 CVR C! 

ELSE . " ERROR : command vector too large " 
THEN 


DSP8@, DS?16@, DSP24®, DSPS ! , DSP16 ! , and DSP24 > 


these words are used to fetch and store data from and to the DSP 
some checking is performed to see that the data registers are ready 


read from DSP 


DSP8@ fetches 8 bits from rxl reg 

DSP16@ fetches 16 bits from DSP rxm and rxl registers 

DSP24® fetches 24 bits from DSP rxh, rxm, and axl registers 


( write to DSP 

{ 

( 

( 


DSPS ! 
DSP16 ! 
DSP24 ! 


write 8 bits to DSP txl register 

write 16 bits to DSP txm and txl registerss 

write 24 bits to DSP txh, txm and txl registers 


HEX 

: REPORT-DSP-ERROR 

. " ERROR : DSP not responding " CR ; 


: WAIT-DSP@ 

FALSE DSP_OK ! ( guilty until proven innocent ) 

200 0 DO RXDF? 

IF TRUE DSP_OK ! LEAVE 
THEN 
LOOP ; 


: DSP8@ ( - B } 

WAIT-DSP@ 

DSP_OK @ IF RXL C@ 

ELSE REPORT-DSP-ERROR 
THEN ; 

: DSP16@ { - W ) 

WAIT -DSP® 

DSP_OK @ IF RXM C@ 100 * RXL C@ + 
ELSE REPORT-DSP-ERROR 
THEN ; 


( : DSP240 ( - D ) 

( WAIT-DSP® 

{ DSP_OK @ IF RXH C@ RXM C@ 100 * RXL C@ + SWAP ; 

| ELSE REPORT-DSP-ERROR 

( THEN ; 


: WAIT-DSP! 

FALSE DS P_OK ! 


( guilty until proven innocent ) 
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20C 0 
DO TXDE? 

I? TRUE DSP_OK ! LEAVE 
THEN 
LOOP ; 


: DSP8 ! ( B - ) 

WAIT-DSP! 

DSP_OK 9 IF 0 TXH C! 0 TXM C! TXL C! 

ELSE REPORT-DSP-ERROR 
THEN ; 

: DSP16 ! ( W - ; 

WAIT-DSP! 

DSP_DK 3 IF 0 TXH C! DUP >< TXM C! TXL C! 
ELSE REPORT-DSP-ERROR 
THEN ; 


( : DSP24 ! ( D - ) 

( WAIT-DSP! 

( DSP_OK @ IF TXH C! DUP >< TXM C! TXL C! ; 

( ELSE REPORT-DSP-ERROR 

( THEN ; 


( *****************************★************************************************) 

( 

( DSP Software Support 

( 

( 

( routines for getting files from the pc to the dsp 

( 

( dsp code is downloaded from the host computer and stored in eeprom. 

{ two buffers are stored, one is 256 bytes long and the other is of variable 
{ length, the 100 byte buffer is typically used to store a bootstrap program 
{ to load the dsp's external program memory from the larger buffer. 

( 


HEX 

( XLATE ACCEPTS AN ASCII VALUE ON THE STACK AND TRANSLATES IT INTO THE HEX VALUE) 
( WHICH IT REPRESENTS. FOR INSTANCE: THE VALUE 41 WILL BE REPLACED BY $0A) 

: XLATE ( ASCI I -VALUE - HEX- VALUE 
DUP DUP 

2F > SWAP 40 < AND 
IF 30 - 

ELSE DUP DUP 40 > SWAP 47 < AND 
IF 37 - 
ELSE 

CR . M ERROR : DNLD failure, illegal character recieved “ CR 
THEN 
THEN ; 


HEX 

VARIABLE END-ADDR 
VARIABLE BOT-BUF 
VARIABLE TOP-BUF 
HERE END-ADDR ! 

2 ALLOT 
HERE BOT-BUF ! 

1200 ALLOT 
HERE TOP-BUF ! 

: DNLD 

CR . " expecting DSP code file in MOTOROLA *.LOD format ... " CR 

KEY DUP EMIT DUP 0D = IF 0A EMIT THEN ( drop first _ 

BEGIN 

KEY DUP EMIT DUP 0D = IF 0A EMIT THEN 5F = ( drop characters until _ ) 
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BEGIN 

KEY DUP EMIT DUP OD = IF OA EMIT THEN OD = 
UNTIL 


( drop chars to line end 


TCP-3UF @ BOT-3UF @ 

DO KEY DUP SE- 
IF EMIT I 1- END-ADDR ! LEAVE 
ELSE DUP 20 = 

IF EMIT R> 1- >R 
ELSE DU? OD = 

IF EMIT OA EMIT R> 1- >R 
ELSE DUP XLATE 10 * SWAP 
KEY DUP XLATE ROT + 

THEN 
THEN 
THEN 
LOOP 
BEGIN 


EMIT 
I C! 


EMIT 


KEY DUP EMIT DUP OD = IF OA EMIT THEN OD = 
UNTIL 

CR . " Download completed M ; 


IF CHAR = ) 

STORE COUNT AS END ADDR LEAVE ) 
IF ITS A SPACE 
PRINT IT BUT DON’T COUNT IT 
IF ITS A CR 

DO CR-LF DON’T COUNT IT 
ELSE XLATE MULT BY $10 


drop rest to prevent that 
( it will be executed 


{ DSP- DUMP DUMPS DSP CODE FROM ONE OF THE BUFFERS INTO THE DSP DATA REGISTERS 
( IT IS ASSUMED THAT THE DSP IS EXPECTING THE DATA. 

: DSP- DUMP 

SOT-3UF @ 2- END-ADDR @ = 

IF CR . " no DSP code in buffer -- DSP-DUMP aborted " CR 
ELSE 

END-ADDR @ BOT-BUF @ DO 
I C@ TXH C! 

I 14- C@ TXM C! 

I 2+ C@ TXL C! 

3 4-LOOP 

T-HFO 

10 0 MS-WAIT F-HFO 10 0 MS-WAIT 
THEN ; 


( VARIABLE CHK_SUM 
( : CHKSUM 

( 30T-BUF @2- END-ADDR @ = 

{ IF . " no DSP code in buffer " 

( ELSE 

( 0 CHK_SUM i 

( END-ADDR @1+ 

[ BOT-BUF @ 

( DO I C@ CHK_SUM @ + CHK_SUM ! 

( LOOP 

( . " DSP chksum: “ CHK_SUM @ U. 

( THEN ; 

( 






Configuration Tables 


All CCD format parameters, CAM voltages, and timing information is 
stored in arrays. Access to these array elements is provided via 
either the array index or parameter name. 

The following word, TABLE, is used to define a new state table. 

It accepts the length of the array on the stac. This length is in words. 

Items in that table nay then be accessed in the following manner : 

" N TABLE_NAME @ " will return the value of the nth item in the table 
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( " X N TABLE_NAME ! “ will assign the value x to the nth item in the table 

( 

DECIMAL 

{ TABLE is used to create an indexed variable table ) 

: TABLE ( W - ) 

DEPTH i < IF CR ." ERROR : insufficient stack entries M CR 
ELSE 

CREATE 2 ALLOT 2* ALLOT 
DOES> SWAP 2* + 

THEN ; 


( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

( 

( 

{ 

( 

( 

( 

( 

( 






Camera Configuration Parameters 


one set of parameters is acceptable if all subarrays are centered 
on the ccd. which is usually acceptable 

note: no checking is performed to see that any of these numbers 
make sense, such checking typically limits flexibility, so just 
try to keep it sensible. 


The parameters may be separated into several groups, each relating to a 
different aspect pf camera operation. 


Format Parameters 


The first group of parameters are considered 'format' parameters. 

These parameters control the area on the CCD imager which will be read 
during the next image acquistion cycle. The format parameters may be set 
to any 16 bit value. They are considered unsigned numbers and range from 
0 to 65535. No type of error checking is performed to assure that the 
current parameters match the user's CCD or that valid image data will be 
obtained. Complete flexibilty within the scope allowed by the geometry 
implied by the parameters is pursued instead. It is up to the user to assure 
that the parameters in use match his or her desires. Upon a system reset 
the format parameters will be returned to the value stored, in the EEPROM 
memory. The format parameters may be stored there at any time using the STORE 
command, discussed above, which stores the entire FORTH dictionary. 


Serial Read Parameters 


The serial register is read out based on a set of format parameters which 
imply the following geometry: 


<<< 

prescan 


under scan origin read dimension post scan 


1 

overscan 


The readout operations are performed from left to right. The pixels in 
the prescan, origin, and postscan are discarded. The pixels in the underscan, 
the read dimension and the overscan are read off the CCD imager. The discarded 
pixels are in units of physical pixels and are not affected by the binning factor. 
The others are read off the chip and binning is performed. The same binning 
factor is used on the pixels in the underscan, read dimension , and overscan. 
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Typically, 

prescan » {under scan * binning factor) - serial extension lengtn 


( and 

J origin + (binning factor * read dimension} + postscan >= CCD serial dimension, 

( but this convention is not enforced. Not all users will care to use the 

{ under scan and overscan features. In this case the prescan, underscan, and overscan 
( parameters may be set to zero and the following equation will be used. 

( origin + (binning factor * read dimension) + postscan = total CCD serial length 


j No effort is made to enforce this convention. It is simply that, a convenient convention. 

r 


( 

f 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 


( 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

( 

( 

( 

( 

( 


0 CCD_SER CCD Serial Dimension : 

This parameter represents the total length of the 
CCD serial register. This includes any pixels in the serial 
extensions on either end of the register. This parameter is 
used by the DSP as the number of pixels to discard when 
it clears the serial register. It is irrelevent to those rows 
which are actually read. 

1 BIN_SER Serial Binning Factor : 

The serial binning factor is the number of pixels in the 
serial register which will be shifted for each pixel 
read. By binning pixels the image resolution is sacrificed 
for higher signal to noise ratio. In low light applications 
or where the image data is one dimensional this my be used 
to great benefit. 


2 PRE_SER Serial Prescan 

The serial prescan is the number of pixels to discard betore 
performing the serial underscan. The prescan is in units of 
physical pixels and is not affected by the binning factor. 

No image data is produced. 


3 UNDER_SER Serial Under Scan 

The serial undrescan is the number of pixels to read after the 
serial prescan. This parameter represents the number of 
binned pixels to read. One data point is produced for each 
unit of under scan. Binning is performed. 

4 ORG_SER Serial Read Origin 

This number represents the number of pixels to be discarded 
after performing the serial under scan. This parameter is in 
units of physical pixels and is unaffected by the binning 
factor. No image data is produced. 

5 READ_SER Serial Read Dimension 

The value of this parameter represents the number of pixels 
to read after the serial origin and before the postscan. These 
pixels are represened in units of binned pixels. One data point 
is acquired for each unit of read dimension. Binning is performed. 


6 POST_SER Serial Post scan 

The value of this parameter represents the number of pixels to 
discard after the read is performed. These pixels are represented 
in units of physical pixels and are not affected by binning factor. 
No image data is produced. 


( 

( 7 OVER_SER Serial Overscan 

{ The value of this parameter represents the number of data points 

( to be taken after the postscan is performed. These pixels are 

( represented in units of binned pixels. One data point is acquired 

{ for each unit of serial overscan. Binning is performed. 

( 


( 



ais57.for 


Thu, Sap 24, 1992 9:41 AM 


1 9 


( 

( 

{ Parallel Read Parameters 


( The parallel register is read out based on a set of format parameters which imply the 
( following geometry: 

( 

( «< 1 1 1 I 1 

( origin read dimension post scan overscan 

( 

( The readout operations are performed from left to right. The rows in the origin 
{ and cost scan are discarded. The rows in the the read dimension and the overscan 
( are read off the CCD imager. The discarded rows are in units of physical rows and 
( are not affected by the binning factor. The others are read off the chip and 
( binning is performed. The same binning factor is used on the rows in the 
( read dimension and overscan. 

( 

( 

{ 

( 3 CCD_PAR 

( 

( 

{ 

( 

( 9 BIN_PAR 

( 

( 

( 

( 

( 

( 

( 

( 10 ORG_PAR 

{ 

( 

( 

( 

( 

( 11 READ_PAR 

( 

( 

( 

( 

( 

( 12 POST_PAR 

( 

( 

( 

{ 

( 

( 13 OVER_PAR 

( 

( 

( 

( 

( 14 PARJDELAY Parallel Clock Delay Time 

( 

( 

( 

( 

( 

( Exposure Parameters 

( 

( Two parameters are used when opening and closing the shutter, bince the shutter 
( takes a certain amount of time to open, and it would be undesirable to begin 
( to time the exposure or read out the CCD before the shutter motion had stopped, 

( these two parameters are provided to allow the user to set the deiay which will 
( take place after the camera controller opens or closes the shutter. The values are 
( stored as 16 bit numbers representing milliseconds. Delay times may therefore 


CCD Parallel Dimension 

This parameter represents the total length of the CCD parallel 
register. This parameter is it clears the parallel register. 

It is irr el event to those rows which are actually read. 

Parallel Binning Factor 

The parallel binning factor is the number of rows in the 
parallel register which will be shifted for each row 
read. By binning rows the image resolution is sacrificed 
for higher signal to noise ratio. In low light applications 
or where the image data is one dimensional this may be used 
to great benefit. 

Parallel Read Origin 

This number represents the number of rows to be discarded 
before performing the parallel read. This parameter is in 
units of physical rows and is unaffected by the timing 
factor. No image data is produced. 

Parallel Read Dimension 

The value of this parameter represents the number of rows 
to read after the parallel origin and before the postscan. These 
rows are represened in units of binned rows. Binning is performed. 
Image data is produced. 

Parallel Postscan 

The value of this parameter represents the number of rows to 
discard after the read is performed. These rows are represented 
in units of physical rows and are not affected by binning factor. 
No image data is produced. 

Parallel Overscan 

The value of this parameter represents the number of rows to 
be read after the postscan is performed. These rows ^are 
represented in units of binned rows. Binning is performed. 

Image data is produced. 
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varv from 0 co 65.535 seconds. If your shuccer cakes longer Chan chis Co open or 
s lose, you will need co wrica cusCom open and close roucines. 

20 CDELAY cime, in milliseconds, required cor Che shuCCer co open 

21 CD ELAY Cime, in milliseconds, required cor Che shutCer Co close 


( The exposure cime for image acquis i cions is scored as a 32 bic value in cwo 
( ^6 bic carameters. The value represenCs Che exposure Cime in milliseconds. The 
( exposure cime may cherefore be set from 0 milliseconds Co just over 7 weeks. This 
( should be sufficient co cover most applications. 

; 22 EXP_TIME__LG 

( 23 EXP_T IME_H I 


( Certain camera commands will clear the CCD as part of thier operation. These 
( commands are typically high level image acquisition commands. The number of times 
- rhat the CCD is cleared in these circumstances is controlled by the value of the 
( following oaramecer. A typical value for this parameter is cwo, but it may range from 
\ 0 co 65 5*. A value of zero may be of use under some circumstances where it is not 
^s-able^co ~lear the imacer at all. A value of 1 is acceptable under most conditions 
\ where a ^cleared ^CCD is desired. The default value typically assigned is 2 is conservative, 
i Values greater chan 2 are likely to be useful only under 'unusual circumstances. 

( 24 NUM__CLEARS number of times to clear CCD per clear cycle 


lower 16 bits of 32 bit exposure time 
higher 16 bits of 32 bit exposure cime 


( Acquisition Sequence Parameters 

( 

( The camera may be operates in a sequenced acquisition mode. Each high level image 
{ acquisition command actually acquires a sequence of images ^based on the values of 
( these parameters. Continuous clearing of the CCD may be performed between images. 

( Clock recombination anti-blooming may be periormed during exposures. The camera may 
( acquire images in a frame transfer mode. The camera readout may be performed at 
( either of two speeds. 


( 

( 25 NUM_I MAGES 

( 

( 

( 26 IM_DELAY_LO 

( 27 IM_DELAY_HI 


number of images to acquire per image acquisition cycle 


lower 16 bits of 32 bit delay between images in cycle 
higher 16 bits of 32 bit delay between images in cycle 


( The default values of 1 for NUM_IMAGES and 0 for both IM_DELAY_HI and 

( IM_DELAY_LO will produce 1 image per hih level command with no additional delay. 

( 30 CCLEAR Continuous Clear Flag 

{ The value of this parameter determines whi ether the 

( camera will perform continuous clearing of the CCD 

( between exposures . 

[ 0 = ontinuous clearing disabled 

( 1 = continuous clearing enabled 


( 31 ANTI -BLOOM Clock Recombination Anti -Blooming Flag 

{ The value of this parameter will determine whether the 

( camera will perform clock recombination anti -blooming 

i during the exposures. 

( 0 = anti -blooming disabled 

( 1 = anti -blooming enabled 

( 32 ARCH CCD architecture 

( The value of this parameter determines whether the camera will 

( perform a ’ shf t image to storage' operation before reading the 

{ image off the CCD. 

( 0 = full frame 

( 1 = frame transfer 
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Camera Readout: Speed 

The value of this parameter determines at what speed the 
camera will readout the image data. The actual speed of 
the two options will depend on camera hardware and software 
configuration. 


{ 

( 

{ 

( 

( 


0 = slow 

1 = fast 


DECIMAL 

64 TABLE PARAM 
( parameter name definitions 

( we can access the variables either by index or name 
DECIMAL 



( parameter locations 15 through 19 unused for now } 

: ODELAY 20 PARAM ; { time, in milliseconds, required for the shutter to open 

: C DELAY 21 PARAM ; { time, in milliseconds, required for the shutter to close 

: EXP_TIME_LO 22 PARAM ; { exposure time as a double word for exposure and integrate 

: EX P_T I ME_H I 23 PARAM ; 

: NUMJ2LEARS 24 PARAM ; ( number of clears to perform when clear is called 

: NUM_IMAGES 25 PARAM ; 

: IM_DELAY_LO 26 PARAM ; ( delay between multiple image acquisitions, as a double word ) 

: IM_DELAY_HI 27 PARAM ; 

{ parameter locations 23 through 29 unused for now ) 

: CCLEAR 30 PARAM ; { continuous clear flag 

: ANTI -BLOOM 31 PARAM ; ( clock recombination anti -blooming flag 

: ARCH 32 PARAM ; 

: SPEED 3 3 PARAM ; 

( : SL_DEL1 34 PARAM ; ( slow readout delay 1 from shift to summing well ) 

( : SL_DEL2 3 5 PARAM ; ( slow read delay 2 from summing well to adc start pulse ) 


( params > 50 are specific to the camera this software is installed in 
( there are currently no ATC5 specific parameters ) 

( AIS camera specific parameters ) 
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' — te : serial direction control is disabled as the camera has been limited to only 
. cr.e pert on either side. ) 

: CAM0_?DIR 51 PARAM ; { parallel direction for CAMO 0 = forwards, 1 = backwards 

. CAMl PD I R 53 PARAM ; ( parallel direction for CAM1 0 = forwards, 1 = backwards 

0 CONSTANT FORWARD 

1 CONSTANT REVERSE 

; DEFAULT PARAMETERS FOR THE AIS1 CAMERA 


2041 

CCD_SER ! 

1 

BIN_SER ! 

15 

?RE_SER ! 

r\ 

yJ 

UNDER_SER 

J 

CRG_SER ! 


READ_SER ! 

1 E 

?OST_SER ! 


OVERjSER ! 

1024 

CCD_?AR ! 

1 

3IN_PAR ! 

Q 

CRG_?AR ! 

1024 

READ_PAR 1 

0 

?OST_PAR ! 

0 

QVER_PAR ! 

20 

ODELAY ! 

100 

CDELAY ! 


0 EXP_T I ME_H I ! 
200 EXP_TIME_LO ! 

2 NUM_CLEARS ! 

1 NUM_IMAGES ! 

0 IM_DELAY_HI ! 
50 IM„DELAY_LO ! 

0 CCLEAR ! 

0 ANTI -BLOOM ! 

0 ARCH ! 

0 SPEED ! 


( print a formatted list of current parameter set 
( : SHOW-PARAMS 
( CR 



CCD_SER 

- 

ll 

CCD_SER 

@ 

5 

U.R 

CR 


BIN_SER 


- 

BINDER 

@ 

5 

U.R 

CR 


PRE_SER 

— 

i« 

PRE_SER 

@ 

5 

U.R 

CR 


UNDER_SER 

— 

•« 

UNDER_SER 

S 

5 

U.R 

CR 


ORG__SER 

= 

" 

ORG_SER 

3 

5 

U.R 

CR 


READ_SER 

- 

it 

READ_SER 

9 

5 

U.R 

CR 


?OST_SER 

= 

“ 

POST_SER 


5 

U.R 

CR 

. " 

OVERJSER 

= 

H 

OVER_SER 

<a 

5 

U.R 

CR 

CR 

CCDJPAR 

= 


CCDJPAR 

9 

5 

U.R 

CR 


BIN_PAR 

- 

n 

BIN_PAR 

a 

5 

U.R 

CR 


ORG_PAR 


" 

ORG_PAR 

a 

5 

U.R 

CR 


READ_PAR 

- 

H 

READ_PAR 

a 

5 

U.R 

CR 


POST_PAR 

= 

“ 

POST_PAR 

a 

5 

U.R 

CR 


OVER_PAR 

- 


OVER_PAR 

a 

5 

U.R 

CR 


PARJ3ELAY 

= 

■ 

PAR_DELAY 

a 

5 

U.R 

CR 


press any key to see next page of parameter list 


BEGIN ? TERMINAL UNTIL CR 


. " ODELAY 
. " CDELAY 
CR 

. " EXP_TIME__HI = 
. " EXP_TIME_LO = 
CR 


ODELAY @ 5 U.R CR 
CDELAY @ 5 U.R CR 

EXP_T IME_HI @ 5 U.R CR 
EXP_T IME_LO @ 5 U.R CR 
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( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

{ 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

f 

( 

( 

{ 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 


. - NUM_CLEARS = 

* NUM-CLEARS @ 5 u. 

R CR 

. " NUM_IMAGES = 

'• NUM_IMAGES 3 5 U. 

R CR 

CR 

. " IM DELAY_HI = 

•' IM DELAY_HI i 5 'J 

'.R CR 

. - IM_DELAY_LO = 

“ IM_DELAY_LO @50 

‘.R CR 

CR 

. - CCLEAR 

” CCLEAR @ 5 U.R CR 

. M ANTI-BLOOM 

= “ ANTI -BLOOM Q 

5 U.R CR 

CR 

" SL DELI - 

SL_DEL1 @ 5 U.R . 

“ SLOW READ DELAY 

" SL_DEL2 = " 

SL_DEL2 & 5 U.R . 

“ SLOW READ DELAY 

ARCH @ IF 

. " ARCH 

FRAME TRANSFER" CR 

ELSE 

. " ARCH 

FULL FRAME " CR 

THEN 

SPEED (i IF 

. - SPEED 

FAST" CR 

ELSE 

. - SPEED 

SLOW" CR 

THEN 

. " press any key to see next page of 
BEGIN ? TERMINAL UNTIL CR 

parameter list . . . " 


. ” GSP_FLAG 
. " GSP_CAP_WIN = 
. - GSP_CAP_X 
. " GSP_CAP_Y 
. " GSPJDISJWIN = 


40 PARAM @ 5 U.R CR 

41 PARAM @ 5 U.R CR 

42 PARAM 8 5 U.R CR 

43 PARAM 8 5 U.R CR 

44 PARAM @ 5 U.R CR 


. " press any key to see next page of parameter list 
BEGIN ? TERMINAL UNTIL CR 


" direction 
■ CAM0_SDIR 
" CAM0_PDIR 
“ CAM1_SDIR 
" CAM1_PDIR 


ags for CAMs 
= " 50 PARAM 

= " 51 PARAM 

= •• 52 PARAM 

= “ 53 PARAM 


0 

= 

forwards. 


5 

U.R 

CR 

& 

5 

U.R 

CR 


5 

U.R 

CR 

d 

5 

U.R 

CR 


- backwards “ CR 


( 

( 

( 

( 


* * * 






Programmable Clock Voltages 


( storage locations for current clock rail settings 

( voltages are stored in the same order as they appear in the dsp's memory map 

( 


DECIMAL 


( FIRST FOR CLOCK/ANALOG MODULE 0 

24 CONSTANT NUM_VOLTS 
NUM__VOLTS TABLE CAM0_VOLT 


CAM 0 _PAR_LO 

CAM0_PAR_MID 

CAM0_PAR_H I 

CAM 0 _S E R_LO 

CAM0_SER_MID 

CAM0_SER_HI 

CAMO_TG_LO 

CAM0_TG_HI 

CAMO_SW_LO 

CAM0_SW_HI 

CAM0_SUB 

C?&. I0_LAST 


0 CAMOJVOLT ; 

1 CAMOJVOLT ; 

2 CAM0_VOLT ; 

3 CAMOJYOLT ; 

4 CAM0_VOLT ; 

5 CAM0_VOLT ; 

6 CAMO_VOLT ; 

7 CAM0_VOLT ; 

3 CAM0_VOLT ; 

9 CAMOJVOLT ; 

10 CAMOJVOLT ; 

11 CAMO_VOLT ; 
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CAM 0 _BST_L0 
CAMC __RST_H I 
CAM0J7RD 
CAMOJ/OD 
CAMQJCJX) 

camo_xi_h: 

CAMO_X2_LO 
CAM0_X2_HI 
CAM0_X2 _LC 
CAM0_X3_HI 
CAM0_X4_LC 
CAM0_X4_HI 


12 CAMOJ/OLT ; 

13 CAMOJ/OLT ; 

14 CAMOJ/OLT ; 
13 CAMOJ/OLT ; 

16 CAMOJ/OLT ; 

17 CAMOJ/OLT ; 
13 CAMOJ/OLT ; 

19 CAMOJ/OLT ; 

20 CAMOJ/OLT ; 

21 CAMOJ/OLT ; 

22 CAMOJ/OLT ; 
22 CAMOJ/OLT ; 


THEN FOR CLOCK / ANALOG MODULE 1 


;TUMJ/OL?S TABLE CAM1J/0LT 


CAM1 _PAR_LO 

CAM 1 _?AR_M 1 0 

CAM 1 _?AR_H I 

CAM1_SER_L0 

CAM1_SER_MI D 

CAM 1 _jSER_H I 

CAM1_TG_L0 

CAM 1 JIG JH I 

CAM1_SW_LC 

CAM1_SW_HI 

CAM1_SUB 

CAM1_LAST 

CAM1_RST_L0 

CAM1_RST_HI 

CAM1_VRD 

CAM1J/0D 

CAM1_X1_L0 

CAM1_X1_HI 

CAM1_X2_L0 

CAM1_X2_HI 

CAM1_X3_L0 

CAM1_X3_HI 

CAM1_X4_L0 

CAM1_X4_HI 


0 CAM 1 J/OLT ; 

1 CAM1J/0LT ; 

2 CAM1J/0LT ; 

2 CAM1J/0LT ; 

4 CAM1 J/OLT ; 

3 CAM1J/0LT ; 

6 CAM1J/0LT ; 

7 CAM 1 J/OLT ; 

3 CAM1J/0LT ; 

3 CAM1J/OLT ; 

10 CAM1 J/OLT ; 

11 CAM1 J/OLT ; 

12 CAM1 J/OLT ; 
12 CAM1 J/OLT ; 

14 CAM 1 J/OLT ; 

15 CAM1 J/OLT ; 

16 CAM1 J/OLT ; 

17 CAM 1 J/OLT ; 

18 CAM1 J/OLT ; 

19 CAM1 J/OLT ; 

20 CAM1 J/OLT ; 

21 CAM1 J/OLT ; 

22 CAM1 J/OLT ; 
22 CAM1 J/OLT ; 


{ SHOW-VOLTS SEND FORMATTED TABLE OF CLOCK VOLTAGES TO HOST COMPUTER 
( : SHOW-VOLTS ( 


CAMO PAR_LO 

C@ 


CAM 0 _PAR_LO 

= 

ii 

2 

U.R 

CR 

camo_?ar_mid 

C@ 

. " 

CAMO __PAR_M I D 

= 

ii 

2 

U.R 

CR 

CAMO_PAR_HI 

C@ 


CAMO _PAR_H I 

= 

»i 

2 

U.R 

CR 

CAMO SER_LO 

C@ 

. " 

CAMO_SER_LO 


" 

2 

U.R 

CR 

CAMO_SER_MID 

C@ 

. " 

CAMO SERJ4ID 

= 

u 

2 

U.R 

CR 

CAMO_SER_HI 

c@ 

. " 

CAMO_SER_HI 

= 

" 

2 

U.R 

CR 

CAMO_TG_LO 

c@ 


CAMO_TG_LO 

- 

" 

2 

U.R 

CR 

CAM0_TG_HI 

c@ 

. " 

CAMOJTG_HI 

= 

" 

2 

U.R 

CR 

CAMO_SW_LO 

c@ 

. M 

CAMO_SW_LO 

= 

11 

2 

U.R 

CR 

CAM0_SW_HI 

C@ 


CAM0_SW__HI 

= 

" 

2 

U.R 

CR 

CAM0_SUB 

c@ 


CAM0_SUB 

= 

M 

2 

U.R 

CR 

CAM0_LAST 

c@ 


CAM0_LAST 

= 

11 

2 

U.R 

CR 

CAMO_RST_LC 

c@ 


CAMO_RST_LO 

= 

11 

2 

U.R 

CR 

CAMO_RST_HI 

c@ 


CAM0_RST_HI 

= 

11 

2 

U.R 

CR 

CAM0_VOD 

c@ 


CAMOJ/OD 

= 

11 

2 

U.R 

CR 

CAMO VRD 

c@ 


CAMO VRD 

= 

** 

2 

U.R 

CR 

CAMO_X1_LO 

c@ 


CAM0__X1 JjO 

= 

" 

2 

U.R 

CR 

CAM0_X1_HI 

c@ 


CAM0_X1_HI 

= 

" 

2 

U.R 

CR 

CAMO_X2_10 

c@ 


CAMO_X2_LO 

= 

” 

2 

U.R 

CR 

CAM0_X2_HI 

C@ 


CAM0_X2_HI 

= 

" 

2 

U.R 

CR 

CAMO_X3_LO 

c@ 


CAMO X3 LO 

= 

" 

2 

U.R 

CR 

CAM0_X3_HI 

c@ 


CAMO X3_HI 

= 

11 

2 

U.R 

CR 

CAMO_X4_LO 

c@ 


CAMO X4 LO 

= 

11 

2 

U.R 

CR 

CAM0_X4_HI 

c@ 


CAM0_X4_HI 

- 


2 

U.R 

CR 

CR 

CAM1_?AR_L0 

c@ 


CAM 1 _PAR_LO 


- 

2 

U.R 

CR 
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CAM1 PAR__MID 

C© 


CAM1 _?AR_MI D 

= 

* 

o 

U.R 

CR 

CAM 1 _ P AR_H I 

C(3 


CAM 1_PAR_H I 

= 


2 

U.R 

CR 

CAMl_SER_LO 

C© 


CAM1 SER LO 

= 


2 

U.R 

CR 

CAM1 SER MID 

C© 

. « 

CAM1_SER_MID 



2 

U.R 

CR 

CAM 1 _SER__H I 

C© 

. “ 

CAM 1 _SER_H I 

= 


2 

U.R 

CR 

CAMl_TG_LO 

C© 


CAMl_TG_LO 

- 

tl 

2 

U.R 

CR 

CAM1_TG_HI 

c© 

>1 

CAM1_TG_HI 

= 

,4 

2 

U.R 

CR 

CAMl_SW_LO 

c© 

M 

CAM1 SW LO 

= 

ii 

2 

U.R 

CR 

CAM1_SW_HI 

c© 

. 11 

CAM1_SW_HI 

= 

ii 

2 

U.R 

CR 

CAM1_SUB 

c© 


CAM1_SUB 

= 

it 

2 

U.R 

CR 

CAM1_LAST 

C© 

. *• 

CAM1_LAST 


it 

2 

U.R 

CR 

CAM1_RST_L0 

c@ 


CAM 1 _RST_LO 

= 

tl 

2 

U.R 

CR 

CAM1 RST_HI 

c@ 


CAM1 RST_HI 

= 


2 

U.R 

CR 

CAM1_V0D 

c@ 

. " 

CAM1_V0D 

= 

ii 

2 

U.R 

CR 

CAM1_VRD 

c@ 


CAM1_VRD 

= 

il 

2 

U.R 

CR 

CAM1 Xl_LO 

c@ 

n 

CAM1 X1JLO 

= 

ii 

2 

U.R 

CR 

CAM1_X1_HI 

c@ 

H 

CAM1_X1_HI 

= 

11 

2 

U.R 

CR 

CAM1„X2_L0 

c@ 


CAM1 'A2_ LO 

= 


2 

U.R 

CR 

CAM1_X2_HI 

c© 


CAM1_X2_HI 

= 


2 

U.R 

CR 

CAMl_X3_LO 

c© 

M 

CAMl_X3_LO 

= 


2 

U.R 

CR 

CAM1_X3_HI 

c© 

M 

CAM1_X3_HI 

= 

11 

2 

U.R 

CR 

CAM1 X4 LO 

c© 

It 

CAMl__X4_LO 

= 

il 

2 

U.R 

CR 

CAM1_X4_HI 

c@ 

II 

CAM1_X4_HI 

= 


2 

U.R 

CR 


( 

( 


( ************************»*~**************************************************} 

( 

( CCD Clock Timing 

( 

( 

( { there's supposed to be some discussion of the concept here. } 


{ *************************x»r*******t******************************************) 

( 

( State Tables 

{ 

{ the camera timing is determined by the variables stored in the following state 
( tables, two tables are provided for each sequence, these include the actual 
( states; i.e the values to be written into the latches on the clock cards; and 
( a set of "waits" that determine how long the sequencer should pause between 
( states. 

( four sequences are stored : PARALLEL CLOCK SEQUENCE 

( SERIAL CLOCK SEQUENCE 

( ANALOG PROCESSING CONTROL SEQUENCE 

( CLOCK RECOMBINATION ANTI BLOOMING SEQUENCE 

( 

{ NOTE : there is no delay on the serial clocks 

{ 

( 

( array length is arbitrarily limited to 32 entries of 16 bits each 

( with the statement directly below defining TABLE_LEN 

DECIMAL 

32 CONSTANT TABLE_LEN 


{ there are two parallel clock state tables. One for one half of the chip 

VARIABLE N_PAR_STATES f * CAMO_N_PAR_STATES , NUMBER OF PAR STATES IN USE 

TABLE_LEN TABLE CAMO _PAR_STATE 
TABLE_LEN TABLE CAM1_PAR__STATE 
TABLE_LEN TABLE PAR_DELAY 

: SHOW- PAR_STATES 
HEX CR 

N_PAR_STATES © 0 

DO I DUP CAMO_PAR_STATE © SWAP 

. " CAMO _PAR_ST ATE " . . " = " 4 . R CR 

LOOP CR 

N_PAR_STATES © 0 
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DO : DUP CAM 1 _PAR_3T ATE @ SWAP 

. " CAM1_PAR_STATS " . . “ = “ 4 -R CR 

LOOP CR 

N_?AR_STATES 9 0 

DC I DUP ?AR_DELAY 9 SWAP 

?AR_ DELAY " . . " = " 4 .R CR 

LOO? ; 


: SET - PAR_DELAYS ( W - ) { sets all parallel delayss to the value W ) 

N_?AR_S T AT E S 9 0 DO DUP I PAR_DELAY ! LOOP ; 


VARIABLE n_SER_STATES ( * CAM0_N_SER_STATES , NUMBER OF SERIAL STATES IN USE 

TA3LE_LEN TABLE SERjSTATE 
: SHOW- SER_STA?ES 
HEX CR 

N_SER_STATES 9 0 

DO I DUP SER_STATE 9 SWAP 

. “ SER_STATE " . . " = " 4 . R CR 

LOOP ; 


VARIABLE N_ANA__STATES { * N_PAR_STATES , NUMBER OF ANALOG STATES IN USE 

TABLE_LEN TABLE ANA_STATE 
TABLE_LEN TABLE ANA_DELAY 

: SHOW-ANA_STATES 
HEX CR 

N_ANA_STATES 9 0 

DO I DUP ANA_STATE 9 SWAP 

. “ ANA_STATE H . . M = “ 4 . R 
I DUP ANA_DELAY 9 SWAP 

ANA_DELAY " . . " = " 4 .R CR 

LOOP ; 


( AB_STATES are used in clock recombination anti -blooming. They are values to 
( be written to the parallel clock control latch during such operation. 

( AB__DELAYS represent the amount of time to pause between each state. 

VARIABLE N ANTI -BLOOM_STATES ( * N_ANTI-BLOOM_STATES = THE NUMBER OF ANTI -BLOOM STATES IN USE 
16 TABLE ANTI -BLOOM_STATE 
16 TABLE ANTI-BLOOM_WAIT 

: SHOW- ANTI -BLOOM_STATES 
HEX CR 

N_ANTI -BLOOM_STATES @0 

DO I DUP ANT I - BLOOM_STATE 9 SWAP 

. “ ANTI - BLOCM_STATE u . .” = “ 4 .R CR 

I DUP ANT I - BLOOM_WAI T 9 SWAP 

ANTI -BLOOM_WAIT " . . " = " 4 . R CR 

LOOP ; 


( State Definitions 


( constants for the parallel timing states are defined below 
HEX 

00 CONSTANT ?l_LO 

01 CONSTANT ?1_MID 

02 CONSTANT ?1_HI 
00 CONSTANT ?2_LO 
04 CONSTANT P2_MID 
08 CONSTANT P2_HI 
00 CONSTANT P3_LO 
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10 CONSTANT P3_MID 
20 CONSTANT P3_HI 
00 CONSTANT P4_LO 
40 CONSTANT P4_MID 
80 CONSTANT ?4_HI 

( constants for transfer gate ) 
0 CONSTANT TG_LO 
100 CONSTANT TG_HI 


( 

constants for the 

serial timing states 

are defined 

00 

CONSTANT 

Sl_LO 



01 

CONSTANT 

S1_MID 



02 

CONSTANT 

S1_HI 



00 

CONSTANT 

S2 LO 



04 

CONSTANT 

S2_MID 



08 

CONSTANT 

S2_HI 



00 

CONSTANT 

S3 LO 



10 

CONSTANT 

S3_MID 



20 

CONSTANT 

S3_HI 



00 

CONSTANT 

S4_LO 



40 

CONSTANT 

S4_MID 



80 

CONSTANT 

S4_HI 



( 

constants 

; for the analog timing states 

are defined 

HEX 




1 

CONSTANT 

RIN ( 

integrator reset 


0 

CONSTANT 

! RIN 



2 

CONSTANT 

DCR ( 

D.C. restore 


0 

CONSTANT 

! DCR 



4 

CONSTANT 

SA2 ( 

sample period 2 


0 

CONSTANT 

! SAC 



8 

CONSTANT 

SA1 ( 

sample period 1 


0 

CONSTANT 

! SA1 



10 

CONSTANT 

CTC ( 

command to convert 


0 

CONSTANT 

! CTC 



20 

CONSTANT 

SEN ( 

send data trigger 


0 

CONSTANT 

! SEN 



40 

CONSTANT 

16B ( 

use slow speed 16 bit 

converter ; 

0 

CONSTANT 

! 16B 




^ **★*★★*★★★**★***★★★★*★*★***★*****★***★**★***★★*★★★***★*★★*********★***★******★) 
( AIS CAMERA CONTROL FUNCTIONS 






****************************************************************************** 
the 68HC11 passes commands to the DSP through the DSP's command vector 
register, CVR, the value written there determines which of the host commands 
will be executed. There are a total of 28 command vectors which may be passed 
the first 26 correspond to the DSP's normal exception processing including 
external interrupts, software interrupts, and other interrupts associated with 
the dsp's various peripherals. Through the CVR, we may force recognition of 
any of these exceptions. Some of those are implented in ths code, 
in addition, there are 12 command vectors reserved for use by the host. It is 
through these command vectors that we normally force ecution of dsp routines, 
the routines which we may cause the dsp to execute include the following: 
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( 

{ 

i 


( 


FUNCTION 


say_ok 

cam-write 

cam_reaa 

volt_test 

cam_ctl ! 

init-volts 

init.~sti.au5s 

ini t- format 

rsad 

clear 

pix-bin 

row- bin 

pix-discard 

row-discard 

pix-read 

row- read 


DESCRIPTION 


respond to 6811 as test 
write to camera addresss 
read from camera address 
test clock voltage dac's 
write to cam control latch 
set cam clock voltages 
set camera readout timing 
set readout parameters 
read the ccd 
clear the ccd 

shift pixels to summing well 
shift rows into ser reg 
clear pixels in ser reg 
clear rows 
read pixels 
read rows 


PARAMETERS ) 


none 

addr data 16 bit ) 


24 

8 bit 

voltage settings 

xx 16 bit 
none 

format parameters 


8 bit 

number of clears 

1 

16 bit 

# of pixels 

1 

16 bit 

# of rows 

1 

16 bit 

# of pixels 

-L 

16 bit 

# of pixels 

± 

16 bit 

# of rows 

1 

16 bit 

# of rows 


shif t_is shift image to storage ( frame transfer only } 

anti-blccm perform clock recombination anti-blooming 


{ VALUES TO WRITE TO THE CVR TO INITIATE THE DSP FUNCTIONS 
HEX 

06 CONSTANT CMD_SAY_OK 

07 CONSTANT CMD_CAM_WRITE 

08 CONSTANT CMD_CAM_READ 

( THE FOLLOWING four ARE USED BY AIS CAMERAS ONLY ) 

09 CONSTANT CMD_VOLT__TEST 
OA CONSTANT CMD__CAM_CTL ! 

OB CONSTANT CMD_INIT_VOLTS 
OC CONSTANT CMD_INIT_STATES 

( 12 CONSTANT CMD_SHADE USED BY ATC5 ONLY 

13 CONSTANT CMD_FORMAT 

14 CONSTANT CMD_READ 

15 CONSTANT CMD_CLEAR 

16 CONSTANT CMD_PIX_BIN 

17 CONSTANT CMD_ROW_BIN 

18 CONSTANT CMD_PIX_DI SCARD 

19 CONSTANT CMD_ROW_DI SCARD 
1A CONSTANT CMD_PIX_READ 

IB CONSTANT CMD_ROW_READ 

ID CONSTANT CMD_SHIFT_IS 
IE CONSTANT CMD_ANTI_3L00M 


I there are several commands which will cause the DSP to perform 
{ some operation repet itivly until told by the 68hcll to stop. 

( Host Flag 1 in the DSP registers is used as a boolean by the DSP 
( after the completion of each cycle to determine if it should 
§ continue. Two functions currently use this flag : continuous 
( clearing of the CCD and clock recombination anti -blooming. 

( Others could be so configured. 

( The following word is used to stop any of these operations. 

: CEASE-AND-DESIST F-HF1 ; 

{ The following word is used to encourage the DSP to continue 
; : PLEASE -CONTINUE T-HF1 ; 


VARIABLE DSP__R£V ( STORAGE FOR DSP REVISION NUMBER ) 


HEX 

: DSP-OK? CEASE-AND-DESIST 
CMD_SAY_OK HV! 
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DSP16@ 4F = 

IF 

DSP16@ 4B - IF DSP16@ DSP_REV ! TRUE DSP_OK ! 
ELSE FALSE DSP_OK ! 

THEN 

ELSE FALSE DSP_OK ! 

THEN 

DSP_CK @ IF 

ELSE REPORT-DSP-ERROR 
THEN ; 


( 

( 

( 

( 

( 

( 


******************************* 






CAM-READ and CAM-WRITE 


Low-level commands for reading and writing DSP adresses from the FORTH 
program . 


0 CONSTANT X_ADDR 

1 CONSTANT Y__ADDR 


( CAM-READ read a value from a DSP address ) 

: CAM-READ ( space address - datum ) 

DSP-OK? DSP_OK @ 

IF DSP-WAIT CEASE-AND-DESIST CMD_CAM_READ HV! 


DSP16 ! 
DSP16 ! 
DSP16© 
DSP_OK @ 


IF DSP-WAIT 
ELSE . “ ERROR 
THEN 


pass the address ) 

( pass the address space : 0 = X 1 = Y 

{ get the datum ) 

DSP error condition persists " CR 


THEN 


( CAM-WRITE write a value to a DSP address ) 

: CAM-WRITE ( datum space address - ) 

DSP-OK? DSP_OK @ 

IF DSP-WAIT CEASE-AND-DESIST CMD_CAM_WRI TE HV! 

DSP 16 j ( pass the address } 

DSP 16 ! ( pass the address space : 0 = x 1 = y ) 

DSP16! ( Pass the data ) 

DSP_OK @ IF DSP-WAIT 

ELSE . " ERROR : DSP error condition persists 41 CR 
THEN 

THEN ; 


( 

{ 

{ 








CCD control registers 


( The CCD is controlled by the DSP through the clock card. The clcok 
( card is a memory mapped device. By writing to the various locations 
( on the clock card the DSP controls the entire CCD reaout. Several of 
( the most important locations on the clock card are defined below as 
( the addresses at which the DSP accesses them. 

( Each is desribed in some small detail below, alongwith thire definitions. 


( AIS AND AIS2 ONLY 
HEX 

FFOO CONSTANT I D_LATCH ( 

FF20 CONSTANT SER_LATCH ( 

FF24 CONSTANT PAR_LATCH ( 

FF28 CONSTANT OUT_LATCH ( 

( 

FF2C CONSTANT ANA_LATCH ( 

FF30 CONSTANT CTL_LATCH ( 


LOCATION, IN ALL CAMS, OF 
LOCATION OF CAM LATCH FOR 
LOCATION OF CAM LATCH FOR 
LOCATION OF CAM LATCH FOR 

LOCATION OF CAM LATCH FOR 
LOCATION OF CAM LATCH FOR 


CAM ID LATCH 
SERIAL CLOCK CONTROL 
PARALLEL CLOCK CONTROL 
RESET, SUMMING WELL, 

AND TRANSFER GATE CONTROL 
ANALOG PROCESSING CONTROL 
CAM SETUP 
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) 


( 

( 


Clock/Analog Module ID registers 


CAM-ID!, CAM-ENABLE, CAM-DISABLE, CAM- ENABLE -ALL 
CAM- DISABLE -ALL, C AMO -ONLY, CAM1 - ONLY 

The various clock/analog modules in the AIS system may be independently 
enabled- -An eight bit latch simultaneously accessed on each clock board 
determines which cam's will respond to subsequent commands. Jumpers on the 
board determine which bit that board will monitor. If that bit is written 
as a zero, then that will respond to all commands issued until that bit is 
^written as a one. More than one board may monitor each bit, effectively 
giving them the same I.D. boards with different I.D.'s may be simultaneously 
accessed by setting each of their I.D. bits low. 


CAM_ID is a variable which stores the most recently issued cam i.d. byte 
the value stored here has a bit set to one tor every cam enabled 
this is inverted before being written to the i.d. latch 


VARIABLE CAM_I3 


( CAM- ID! commands the DSP to write the CAM- ID to the ID latch in the CAM’S 


: CAM-ID! 


CMD_CAM_WRITE HV! 
I D_LATCH DSP16 ! 
Y_ADDR DSP16 ! 
CAM_ID 3 
EFFF XOR 
DSP16 ! ; 


( ASK THE DSP TO WRITE TO A MEMORY LOCATION 
{ MAKE IT THE CAM ID LATCH 
{ WHICH IS IN Y SPACE 
{ FETCH THE CURRENT CAM ID 
( INVERT ALL THE BITS 
( WRITE IT 


HEX 

01 CONSTANT CAMO 

02 CONSTANT CAM1 

( CAMS 2-7 APE NOT USED IN THIS CAMERA SYSTEM 
( 04 CONSTANT CAM2 
( 08 CONSTANT CAM3 
( 10 CONSTANT CAM4 
( 20 CONSTANT CAM5 
( 40 CONSTANT CAM6 
( 80 CONSTANT CAM7 


FF CONSTANT ALL__CAMS 

( CAM-ENABLE expects one of the constants CAMO - CAM7 on the stack 
( or's this value with the current CAM_ID 

( stores this and calls CAM-ID! to write it to the latch 

: CAM- ENABLE 

CAM_ID @ OR 
CAM_ID ! CAM-ID! ; 


( CAM-DISABLE expects one of the constants CAMO - CAM7 on the stack 
( inverts this and ands it with current CAM_ID 

( stores this and calls CAM-ID! to write it to the latch 

: CAM-DISABLE 

FFFF XOR 
CAM_ID <3 AND 
CAM_ID ! CAM-ID! ; 


( The following words anable and disable ALL the CAMs in the system. 

: CAM-ENABLE-ALL FF CAM_ID ! CAM-ID! ; 

: CAM- DISABLE -ALL 00 CAM_ID ! CAM-ID! ; 

( The following words are used to assure that only ONE CAM is enabled. 
: CAMO -ONLY CAM-DISABLE -ALL CAMO CAM-ENABLE ; 
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: CAM1 -ONLY CAM-DISABLE-ALL CAM1 CAM-ENABLE ; 


( ******** **************************************************************** ******) 
( CAM CONTROL REGISTERS 

{ EACH CAM CONTAINS AN 8 BIT CONTROL REGISTER 


v BIT 0 
( BIT 1 
( BIT 2 
( 3IT 3 
( BIT 4 
( BIT 5 
( BIT 6 
( BIT 7 


CLOCK ENABLE CLOCKS THROUGH TO CCD ACTIVE HIGH 

ANALOG CONTROL ENABLE 

PARALLEL CLOCK ENABLE 

SERIAL CLOCK ENABLE 

OTHER CLOCKS ANABLE 

NOT USED 

NOT USED 

NOT USED 


( a storage location for current value in control latch for each CAM 


VARIABLE CTL_CAM0 
VARIABLE CTLJCAM1 


( VARIABLE CTL_CAM2 
( VARIABLE CTL_CAM3 
( VARIABLE CTL_CAM4 
( VARIABLE CTL_CAM5 
( VARIABLE CTL_CAM6 
( VARIABLE CTL__CAM7 


( CAM-CTL ! stores a value in the camera control latch of the 
( currently selected CAM. expects the value on the stack 

: CAM-CTL ! 

DSP-WAIT 

CLR-TXH-TXM 

CMD_CAM_CTL ! HV! (call function 
DSP16 ! ( pass data 

DSP-WAIT ; 


ENABLE -CCD-CLOCKS and DI SABLE -CCD-CLOCKS 


( These words are used to open and close the switches which allow the 
( CCD clocks and voltages to be connected to the buffers or wires which 
( connect them to the CCD. When the switches are open, pull down resistors 
( pull the potentials to near 0 volts. 

( 

( the following word is used to enable the clock signals in each CAM 
( it expects the CAM ID { CAMO - CAM7 } to be on the stack 
: CLKS-EN 

CAM_ID @ TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTL_CAM0 @ T-0 DUP CTL_CAM0 ! 

ELSE 

DUP CAM1 = 

IF 

CAM1 - ONLY CTL_CAM1 @ T-0 DUP CTL_CAM1 ! 

THEN 
THEN 
CAM-CTL ! 

DROP TEMPO @ CAM_ID ! CAM-ID! ; 


( the following word is used to disable the clock signals in each CAM 
( it expects the CAM ID { CAMO - CAM7 } to be on the stack 
: CLKS-DIS 

CAM_ID <i TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTL_CAM0 @ F-0 DUP CTLJZAMO ! 

ELSE 
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DUP CAM1 = 

IF 

CAM! -ONLY CTLJCAM1 3 F-0 DUP CTLJCAM1 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO 3 CAM_ID ! CAM-ID! ; 



r “he following words are used to enable and disable the different latches 
| in each cam. they expect the cam id { camO - cam7 } to be on the stack. 

: ANALOG -EN 

CAM_ID a TEMPO ! 

DUP CAMC = 

IF 

CAMO -ONLY CTLJCAMO 3 F-l DUP CTLjCAMO ! 

ELSE 

DUP CAM1 = 

CAM1 -ONLY CTL_CAM1 3 F-l DUP CTL_CAM1 ! 

THEN 
THEN 
CAM-CTL ! 

DROP TEMPO 3 CAM_ID ! CAM- ID! ; 


: ANALOG-DIS 

CAM_ID 3 TEMPO ! 

DUP CAMO = 

CAMO -ONLY CTLjCAMO 3 T-l DUP CTLJCAMO ! 
ELSE 

DUP CAM1 = 

IF 

C AMI -ONLY CTL_CAM1 3 T-l DUP CTLJCAM1 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO 3 CAM_ID ! CAM- ID! ; 



ENABLE- PARALLELS and DISABLE -PARALLELS 


( These words are used to bit enable and disable the output of the 
{ parallel clock control latch. 


( These words also set the Frame ENable and Line ENable signals to 
( their active low states allowing interface boards that monitor 
( these signals to collect the data while the parallels are not running. 
( This low level mode of operation is useful for test purposes. 

( 


CAM_ID 3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTLJCAMO 3 F-2 DUP CTLJCAMO ! 
ELSE 

DUP CAM1 = 

IF 

CAM1-ONLY CTLJCAM1 3 F-2 DUP CTLJTAM1 ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO 3 CAM_ID ! CAM- ID! ; 


CAM_ID 3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTLJCAMO 3 T-2 DUP CTLJCAMO 
ELSE 



ais57.for 


Thu, Sep 24, 1992 9:41 AM 


33 


DUP CAM1 = 

IF 

CAM1 -ONLY CTL_CAM1 3 T-2 DUP CTL_CAM1 ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO <3 CAM_ID ! CAM-ID! ; 


( ENABLE-SERIALS and DISABLE-SERIALS 

( 

( These words are used to bit enable and disable the output of the 
( SERIAL clock control latch. 


: SCLKS-EN 

CAM_ID (3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTL_CAM0 <3 ?-3 DUP CTL_CAM0 ! 
ELSE 

DUP CAM1 = 

IF 

CAM1 -ONLY CTLjCAMl 3 F-3 DUP CTL_CAM1 ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO <3 CAM__ID ! CAM-ID! ; 

: SCLKS-DIS 

CAM_ID (3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTL_CAM0 (3 T-3 DUP CTL_CAM0 ! 
ELSE 

DUP CAM1 = 

IF 

CAM1 -ONLY CTL_CAM1 9 T-3 DUP CTLjCAMl ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO (3 CAM_ID ! CAM-ID! ; 


: OCLKS-EN 

CAM_ID (3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTLjCAMO <3 r-4 DUP CTL_CAM0 ! 
ELSE 

DUP CAM1 = 

IF 

CAM1 -ONLY CTL_CAM1 @ F-4 DUP CTL_CAM1 ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO (3 CAM_ID ! CAM-ID! ; 

: OCLKS-DIS 

CAM_ID (3 TEMPO ! 

DUP CAMO = 

IF 

CAMO -ONLY CTL_CAM0 (3 T-4 DUP CTL_CAM0 ! 
ELSE 

DUP CAM1 = 

IF 

CAM1-ONLY CTL_CAM1 @ T-4 DUP CTL_CAM1 ! 
THEN 
THEN 
CAM-CTL ! 

DROP TEMPO (3 CAM_ID ! CAM-ID! ; 
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: ALL-CLKS-EN ( 
01 CAM-CTL! 


: ALL-CLKS-DIS ( 
FE CAM-CTL! 


enable all clock signals on currently selected CAM ) 
disable all clock signals on currently selected CAM } 


{ * * 






Format commands 


; FORMAT!, FORMAT? 

These two words may be used to set and examine the format parameters in 

■ a "fairly low-level way. In each case the format parameters are passed as a 

■ airrpls character stream. The order of the parameters is easy to remember. 

( FORMAT sets the format parameters to the values round on the stack ) 


; FORMAT SETS THE FORMAT PARAMETERS TO THE VALUES FOUND ON THE STACK ) 
DECIMAL 
: FORMAT ! 

DEPTH 14 < 


IF 

CR . M ERROR : INSUFFICIENT STACK ENTRIES " CR 


CCD_SER ! 
READ_SER ! 

! BIN_SER ! 
! POST_SER ! 

PRE_SER ! 
OVER_SER ! 

UNDER_SER ! 

ORG_SER ! 


CCD_PAR ! 
THEN ; 

! BINJPAR ! 

ORG_PAR ! 

READ_PAR ! 

POST_PAR ! 

OVER_PAR 


FORMAT? SIMPLY ECHOES THE FORMAT PARAMTER VALUES IN ORDER ) 
FORMAT? 

CR 


CCD_SER 

3 

U. 

BIN_SER 

@ 

u. 

PRE_SER 

3 

U. 

UNDER_SER 

@ U. 


ORG_SER 

a 

u. 

READ_SER 

3 

U. 

POST_SER 

3 

U. 

OVER_SER 

3 U. 


CCD_PAR 


u. 

3IN_PAR 

@ 

u. 






PAR_DELAY ® U 

ORG_PAR 
ARCH 3 U. 


u. 

READ_PAR 

3 

u. 

POST_PAR 

3 

u. 

OVER_PAR 

3 U. 



CR ; 








( 

( 


Camera Initialization 


( INIT-DSP, I NIT -VOLTS, INIT-STATES, INIT-FORMT , INIT-ALL 

{ a variety of initialization routines are required to get the camera hardware 
( ready to acquire image data. All of them are executed by calling one routine 
( 1 iNIT 1 defined near the end of this document. The INIT routine performs a 
( number of other tasks as well. These routines are used when it is necesary 
{ to reinitialize some part of the hardware due to a configuration change. Much 
' camera configuration information is not valid until initialized. Clock card 
( voltages, for instance, are not set to the values stored in the VOLT table until 
i the INIT-VOLTS function is performed. Similiarly, the readout format parameters 
( due not take effect until the INIT-FORMAT function is called, and the timing 
( information stored in the various timing tables is not used until INIT-STATES is 
( called. Nothing can be accomplished at all if the . DSP is not operating. The 
f INIT-DSP function is provided for the purpose of initializing the DSP program. 

( This is useful in development work where new DSP code has been downloaded. 

( The INIT-ALL function is a convenient way to just re-initialize everything 
( having to do with the DSP sequencer. 


HEX 
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: INIT-DSP 

DSP -BOOT 
ICR 03 0 = 

ISR C3 6 = AND 

CVR C3 12 = AND 

IF ( if boot was successful — 

DSP- DUMP ( ... dump code to DSP. 

DSP-OK? { ... check DSP status 

ELSE 

FALSE DSP_OK ! 

CR . “ ERROR : DSP bootstrap failed " CR 
THEN ; 


( SETS THE CLOCK BOARD VOLTAGES) 

: INIT-VOLTS ( - ) 

DSP-OK? DSP_OK 3 
IF CLR-TXH-TXM 
CAMO-ONLY 
CMD_INIT_VOLTS HV! 

NUM_VOLTS 0 DO I CAMO_VOLT C3 DSPS! LOOP 
( . " CAMO voltages initialized " CR 

DSP-OK? DSP_OK 3 
IF CAM1 -ONLY 

CMD_INIT_VOLTS HV! 

NUM_VOLTS 0 DO I CAM1_V0LT C3 DSP8 ! LOOP 
( _ " CAM1 voltages initialized " CR 

DSP -WAIT 

ELSE . " ERROR : INIT-VOLTS terminated, DSP error " CR 
THEN 

ELSE . " ERROR : INIT-VOLTS terminated, DSP error * CR 
THEN ; 


( INIT-STATES DOWNLOADS THE CURRENT SET OF PAR_STATE, SER_STATE , 
( AND ANA_STATE VALUES TO THE DSP 

: INIT-STATES ( -) 

DSP-OK? DSP_OK 3 
IF CMD_INIT_STATES HV! 

CLR-TXH-TXM 


N_?AR_STATES 3 DUP DSP16 ! 
N_?AR_STATES 3 
N_?AR_STATES 3 
N SER_STATES 3 DUP DSP16 ! 


N_ANA_ST AT E S 3 DUP DSP16 
N_ANTI -BLOOM_STATES 3 DUP DSP16 ! 

0 DO I ANTI -BLOOM_STATE 3 DSP16 ! 
DSP- WAIT 

ELSE . " ERROR : INIT-STATES terminated 
THEN ; 


0 DO I CAMO_PAR__STATE 3 DSP16 ! LOOP 

0 DO I CAM 1 _PAR_STATE 3 DSP16 ! LOOP 

0 DO I PAR_DELAY 3 DSP16 ! LOOP 

0 DO I SER_STATE 3 DSP16 ! LOOP 

0 DO I ANA_STATE 3 DSP16 ! I ANA_DELAY 3 DSP16 ! LOOP 


I ANTI - BLOOM_WA I T 3 DSP16 ! LOOP 


DSP error 


CR 


: INIT-FOFMAT 
DSP_OK 30= 

IF CR . " DSP ERROR : INI T -FORMAT aborted " CR 
ELSE 

DSP -WAIT 


CLR-TXH-TXM 

CEASE-AND-DESIST 


CMD_FORMAT 

CCD_SER 

1 HV! 

3 DSP16 ! 

BIN_SER 

3 

DSP16 ! 

PRE_SER 

3 

DSP16 ! 

UNDER_SER 

3 

DSP16 

ORG_SER 

■3 DSP16! 

READ_SER 

3 

DSP16 ! 

POST_SER 

3 

DSP16 ! 

OVER_SER 

3 

DSP16 

CCD_PAR 

<3 DSP16 ! 

BIN_PAR 

3 

DSP16 ! 

ORG_PAR 

3 

DSP16! 

READ_PAR 

3 

DSP16 

PCST_PAR 
CAMO PDIR 
DSP-WAIT 

3 DSP16 ! 
a DSP16 ! 

OVER_PAR 

CAM1_PDIR 

3 

3 

DSP16 ! 
DSP16 ! 








THEN ; 
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INITIALIZE EVERYTHING 
: I MIT -ALL 

INIT-DSP 
I MIT -VOLTS 
INIT- STATES 
INIT-rORMAT 


^*** x ^*^^ 1 fie ^^ x **-*.*************x****************************'****************** ) 

Camera Speed 


ITIME ! , 40KHZ, 35KHZ , 30KHZ, 25 KHZ, 20KHZ, 15KHZ, 10KHZ 

t 

| The AISI READOUT SPEEDlow speed is adjustable from approx 40kHz downward. 

( The exact speed depends on some Liming variables, most importantly i_he integration 
< time of the dual slope integrator. The SPEED may be adjusted^ over a much wide 
( range and. As the ANALOG TO DIGITAL convertors architecture is that of a dual 
s I ooe integrator, tne gain of thr system is directly afected by the integration 
; time. The integration time is determined by the values of ANA_DELAY s 7 and 9. 
i several words are provided here to set the cameras slow readout rate to convenient 
■ values. 

DECIMAL 


: The following word sets the integration time for the slow^ speed analog processor. 

' It ext acts a 16 bit number on the stack with a vaiue ranging from ±. ~> 65535. 
f This value is used by the DSP as a counter for the integration . delay . The DSP 
delays 100 ns for every unit in the integration time. Integrations may therefore 
( vary from 100ns to 6.5535 ms. In practice, there is approx 350 ns overhead in the 
( delay time and 100ns integration times are not possible. Additionally, if the 
( time is set too short, the converter will not have r mi shed converting the previous 
( pixel when the new command to convert comes along. Integration times as short as 
( 1 us should work fine. Extremely long integrations will saturate the converter. 

( 

• ITIME 1 ( w - ) ( expects the desired integration time on the stack ) 

DUP 7 SLOW_DELAY ! 

9 SLOW_DELAY ! 

INIT- STATES ; 

( SPEED! is used to set the slow speed to a particular value. It expects the 
( new vaiue for the integration time on the stack, it is used primarily as a 
( convenience for the definition of the words that follow. 

: SPEED! ( W - ) 

1 0 ANA_DELAY ! 

1 1 ANA_DELAY ! 

1 2 ANA_DELAY ! 

1 3 ANA_DELAY ! 

1 4 ANA_DELAY ! 

12 5 ANA_DELAY ! 

1 6 ANAJ3ELAY ! 

1 3 ANA_DELAY ! 

1 10 ANA_DELAY ! 

1 11 ANAJDELAY ! 

1 12 ANA_DELAY ! 

50 13 ANA_DELAY ! 

DuP 

( STACK ) 7 ANA_DELAY ! 

( STACK ) 9 ANA__DELAY ! 

INIT -STATES ; 

( The following words set the camera readout speed to some convenient values. 


DECIMAL 



: 40KHZ 

38 

SPEED 

: 35KHZ 

56 

SPEED 

: 30KHZ 

80 

SPEED 

: 20KHZ 

163 

SPEED 
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: 15KHZ 245 SPEED ! ; 
: 10KHZ 411 SPEED! ; 
: 5 KHZ 910 SPEED! ; 


I * *********************************************************** ***************** ) 

( WORDS FOR SHUTTER CONTROL 

^ **************************************************************************** ) 

. x ********************************************************** *******************) 

( The following words are used for shutter control in AIS1 cameras 

: OPEN1 PORTA C@ T-5 PORTA C! ; 

: OPEN2 PORTA C@ T-6 PORTA C! ; 

: CLOSE1 PORTA C@ F-5 PORTA C! ; 

: CLOSES PORTA C@ F-6 PORTA C! ; 

: OPEN 

OPEN1 OPEN2 
ODELAY @ 0 MS -WAIT ; 

: CLOSE 

CLOSE1 CLOSE2 
CDELAY @ 0 MS -WAIT ; 


{ The following words are used for shutter control 
( in ATC5 and AIS2 cameras. 

{ : OPEN PORTA C@ T-6 PORTA C! ODELAY @ 0 MS-WAIT ; 

( : CLOSE PORTA C® F-6 PORTA C! CDELAY @ 0 MS-WAIT ; 


I ***************************************************************************** ) 

( System commands 

I **************************-ir************************************************** ) 

{ ***************************************************************************** ) 

( 

( Continuous Clearing of the CCD 

( 

( START-CISC, STOP-CISC, CISC?, CISC-ON, and CISC-OFF 

( This set of words is used in conjunction with continuous clearing of the CCD 
( CCD between readouts. It is often desirable to continuously clear charge off^ 

( the CCD between image acquisitions. If there is no shutter in the system or if 
( the temperature of the CCD is fairly high this is very desirable. In a cryogenic 
( camera, this is not as important as the dark current is typicaly very low. 

( The 'CISC' terminology comes from the Photometries CC200 where it stood for 
( 'Clear Image and Storage Continuously'. 

( Continuous clearing of the camera is controlled by the DSP. If it is in its idle 
( state waiting for a host command and it detects Host Flag 0 in the Host Interface 
( as a '1\ then the DSP clears a row off the CCD. The flag is used in a reverse 
( logical sense, i.e. a 'O' enables CISC and a ' 1 disables it. 

( The 68HC11 controls this feature simply by setting and clearing this flag at 
( any time. A parameter is maintained which may be polled at any time to determine 
( if it should do so. 

( 


: START-CISC F-HFO ; 


STOP-CISC 


T-HFO ; 
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( -he following word checks the parameter and either enables or disables CiSC 

- CISC? CCLEAR 3 IF START-CISC 

ELSE STOP-CISC 
THEN ; 

f che following words both set the flag and the parameter } 

: CISC-CN TRUE CCLEAR ! START-CISC ; 

: CISC-OFF FALSE CCLEAR ! STOP-CISC ; 


* * * * * * 






) 


Clock Recombination Anti -Blooming 


( START -CRAB, STOP-CRAB, CRAB?, CRAB-ON, and CRAB-OFF 

( This set of words is used in conjunction with continuous clearing of the CCD 
{ CCD between readouts. It is often desirable to continuously clear charge off. 

( che CCD between image acouisitions. If there is no shutter in the system or if_ 

( the temperature of the CCD is fairly high this is very desirable. In a cryogenic 
( camera,’ this is not as important as the dark current is typicaly very low. 

( Clock recombination anti-blooming is controlled by the DSP. It may be told to 
( begin the process through a Host Command at any time that it is not executing 
{ any other host command. It will continue util the 68HC11 tells it ot SL.op 
( by clearing HF1. (see CEASE-AND-DESIST above) 

( The 68HC11 will call this function during exposures if the ANTI-BLOOM 
( parameter is set to true. 


CEASE-AND-DESIST 
DSP -WAIT 

CMD___ANT I_3L0CM HV! ; 

CEASE-AND-DESIST ; 

word checks the parameter and either enables or disables CRAB 
ANTI -BLOOM @ IF START-CRAB ELSE STOP-CRAB THEN ; 

( The following words set or clear the ANTI-BLOOM parameter. 

( They DO NOT start the anti -blooming they simply set the camera up so that it 
( will be performed during the next exposure. 

: CRAB-ON TRUE ANTI -BLOOM i ; 

: CRAB-OFF FALSE ANT I -BLOOM ! CEASE-AND-DESIST ; 


: START-CRAB 

: STOP-CRAB 

( the following 
: CRAB? 


************ 


* * ★ 






( the exposure time desired by the user is in the parameter table above. 

( It is stored as an upper and lower half, each 16 bits wide. 

J the variable exp_left used below is defined above, so as to accessable 
( to the timer interrupt routines. It is decremented by the millisecond 
< rimer when the exp flag is set. The EXPOSING is defined above as well. 


: EXP-START 

CRAB? 

FALSE EXPOSING ! 

EXP_TIME_LO ® EXP_TIME_HI 3 0= SWAP 0= AND 
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ELSE 

EXP__T IME_LO @ EXP_T IME_H I @ EXP__LEFT! 
OPEN 

TRUE EXPOSING ! 

THEN ; 


: EXP- PAUSE 

CLOSE CEASE-AND-DESIST FALSE EXPOSING ! ; 


: EXP-RESUME 

OPEN TRUE EXPOSING ! ; 


: EXP-AEORT 

CLOSE CEASE-AND-DESIST FALSE EXPOSING ! 0 0 EXP_LEFT! CISC? ; 


: EXP-LEFT? 

EXP_LEFT@ D. ; 


: EXP -WAIT 

BEGIN EXPOSING £ FALSE = UNTIL ; 


: EXP- STOP 

CLOSE CEASE-AND-DESIST ; 


: EXPOS E_CCD 

EXP-START EXP-WAIT EXP-STOP ; 


{ **************************************************************************** ) 

( 

( CCD Image Integration 

{ 

( 

( INTEGRATE-LIGHT, INTEGRATE -DARK 

( Two functions are provided for integrating charge onto the CCD. In one 
{ the shutter is opened and in the other ir is not. One is used to acquire 
( light images and the other for measuring dark current. In both cases, the 
( charge is integrated for EXP_TIME milliseconds. 

( 

( 

: I NTEGRATE_L I GHT EXPOSE_CCD ; 

: INTEGRATEJDARK 
CRAB? 

EXP_TIME_LO @ EXP__T IME_H I @ 0= SWAP 0= AND 
IF 

ELSE 

EXP_TIME_LO @ EXPJTIME_HI @ MS-WAIT 
CEASE -AND-DESI ST 

THEN ; 


I **********************★*************★**********★******************************) 

( 

( Low Level Image Acquisition Routines 

( 

( A set of low level image acquisition routines is provided 
( for those users who wish to build their own custom read routines 
( A small amount of additional overhead is associated with a read 
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seauence based on. lew level routines, due to increased participation 
■ by "the 63HC11, but very complicated read sequences can be 

constructed. Not all users will wish to use these routines, as 
normal operational modes are fully supported by the high level 
image acquisition routines. 

; Low level image acquistion routines include the following: 

PIX-BIN 
ROW-BIN 
PIX-CLR 
ROW-CLR 
PIX-READ 
ROW -READ 

These lew level dsp routines can be used to build more complex 
f ’unctions by combining calls to them into forth words and 
' storing these in the dictionary. 


shift N serial pixels into the summing well 

shift N parallel rows into the serial register 

clear N pixels from serial register 

clear N rows off parallel register 

read N pixels from serial register 

read N rows from parallel register 


r DSP-16CMD is used by a number routines that take that particular form. 

Only works for functions that pass a 16 bit value to the dsp. 

Implemented here to save on dictionary space. Note that 

not all the dsp commands are issued this way. This word 

expects the value and the command number on the stack. Returns nothing. 

: DSP-16CMD ( W W - ) 

DSP -WAIT CEASE-AND-DESIST 

avj ( store the command number from the stack ) 

DSP16! 

DSP-WAIT ; 

( PIX-BIN shift w serial pixels into the summing well ) 

: PIX-BIN { W - ) 

CMD_P I X_B I N DSP-16CMD ; 


[ ROW-BIN shift w parallel rows into the serial register ) 

: ROW-BIN ( W - ) 

CMD_ROW_B I N DSP-16CMD ; 


( PIX-CLR clear w pixels from serial register ) 

: PIX-CLR ( W - ) 

CMD_P I X_D I SCARD DSP-16CMD ; 


{ ROW-CLR clear w rows off parallel register ) 

: ROW-CLR ( W - ) 

CMD_ROW_DI SCARD DSP-16CMD ; 


( PIX-READ read w pixels from serial register ) 

: PIX-READ ( W - ) 

CMD_P I X_READ DSP-16CMD ; 


( ROW-READ read w rows from parallel register ) 

: ROW-READ ( W - ) 

CMD_ROW_READ DSP-16CMD ; 




High Level Image Acquisition Routines 


{ SHIFT-IS 
{ CLEAR 
( READ 

( 


shift image portion of frame transfer device to storage ) 

clear the entire ccd array, num_clears times 

read out the CCD based on format, 

storage area only in a frame transfer device 
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( 

( 

( 


BIAS 

DARK 

OBS 


acquire a bias frame, num_images times 
acquire a dark reference frame, num_images times 
acquire a light frame, num_images times 


( 

( 

( 

( 

( 

( 


SHIFT_IS shift image portion of frame transfer device to storage ) 

Not yet implemented in the AIS1 camera. 

: SHIFT_IS ( - ) 

DSF-WAIT CEASE-AND-DESIST CMD_SHIFT_IS HV! DSP-WAIT ; 


( CLEAR clear the entire ccd array, num_clears times 
{ All charge is cleared off the CCD. The DSP is told to stop 
( any curent action, the 68HC11 waits until the DSP does so, 

( and then passes the clear command to the DSP. The 68HC11 then 
( waits for the DSP to finish clearing the CCD. 

( This process is repeated NUM__CLEARS times. NUM_CLEARS is a 
{ a parameter the value of which may vary from 0 -> 655535. 

: CLEAR 

NUM_CLEARS @0= NOT 
IF MUM_CLEARS 3 0 
DO DSP-WAIT 

CEASE-AND-DESIST 
CMD__CLEAR HV! 

DSP-WAIT LOOP 

THEN 


{ 

( 



{ 

( 

( 

( 


READ read the image data off the CCD 

The DSP is told to stop any current action, the 68HC11 waits until 
the DSP does so, and then passes the READ command to the DSP. The 
68HC11 then waits for the DSP to finish reading the image off the CCD. 
The CCD is read out the CCD based on the current format parameters. 
Only the storage area is read in a frame transfer device. 

READ 

DSP-WAIT 

CEASE-AND-DESIST 
CMD_READ HV! 

DSP-WAIT 


( BIAS acquire a bias frame, num__images times _ 

( The shutter is closed, CISC stopped, the CCD is cleared, the 
( image data is read off the chip based on the current format parameters, 
{ continuous clearing of the chip is begun, if enabled, and then a 
( delay of IM_DELAY milliseconds is executed. 

( This entire sequence is executed NUM_IMAGES times. 

. 3j^s ( - ) 

NUM_IMAGES 3 0 DO 
CLOSE 
T-HFO 
CLEAR 
READ 
CISC? 

IM_DELAY_LO 3 IM_DELAY_HI 3 MS-WAIT 
LOOP 


{ 



( 

( 

( 

( 

( 

( 

( 


DARK acquire a dark reference frame, num_images times 
The shutter is closed, CISC stopped, the CCD is cleared, dark 
current is integrated for EXP_TIME milliseconds, the image data 
is read off the chip based on the current format parameters, 
continuous clearing of the chip is begun, if enabled, and then a 
delay of IM_DELAY milliseconds is executed. 

This entire sequence is executed NUM_IMAGES times. 

If enabled, clock recombination anti blooming is performed during 
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dark frame integration. 

: DARK ( - ) 

NUM_IMAGES £ 0 DO 
CLOSE 
T-KFO 
CLEAR 

INTEGRATE_DARK 

READ 

CISC? 

Im1dELAY_LO 9 IM_DELAY__HI 9 MS -WAIT 
LOOP 


OES acquire a light frame, num_images times 

; The shutter is closed, CISC stopped, the CCD is cleared, the 

( shutter is opened, light is integrated for EXP_TIME milliseconds, 

; the shutter is closed, the image data is read off the chip based 

( on the current format parameters, continuous clearing of the chip 

{ is begun, if enabled, and then a delay of IM_DELAY milliseconds 
i is executed. 

; This entire sequence is executed NUM_IMAGES times. 

If enabled, clock recombination anti-blooming is perlormed during 
; light integration. 

: OBS ( - ) 

NUM_IMAGES 9 0 DO 
CLOSE 
STOP- Cl SC 
CLEAR 
EXPOSE_CCD 
READ 
CISC? 

IM__DELAY_LO 9 IM_DELAY_HI 9 MS-WAIT 
LOOP 






t 

( 

( 

( 

( 

( 

( 

( 

{ 

( 

( 

( 

( 

( 

i 

( 


Test Functions 


A small set of test functions are provided for hardware debug. 

Most are repetitive words which are useful for testing for testing small 
subsets of the clock and analog cards. 

RREAD read the CCD until terminal break 

RCLEAR clear the CCD until terminal break 

RBIAS clear, then read the CCD until treminal break 

ROBS execute a light acquisition sequence until terminal break 

RDARK execute a dark acquisition sequence until terminal break 

VOLT-TEST test all clock card voltages 

LATCH-TEST test all clock card latches 


( 


ROBS 

BEGIN 

OBS 

RDARK 

BEGIN 

DARK 

RREAD 

EEGIN 

READ 

READS 

BEGIN 

READ 

RCLEAR 

BEGIN 

CLEAR 

RBIAS 

BEGIN 

BIAS 


? TERMINAL UNTIL ; 
? TERMINAL UNTIL ; 
? TERMINAL UNTIL ; 
?TERMINAL UNTIL ; 
? TERMINAL UNTIL ; 
? TERMINAL UNTIL ; 
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( 

{ 


* * * * 


■k-x-K-X-xt-tcieicki'-X-x 4 *****'* 


i(ieiri(ir X*Xickic***'k******'kx*X-kiexXXX***XXie***ieXir*ie***i(*** 

Startup Initialisation 


) 


( The 63HC11 performs certain functions on startup. 

( Version number is echoed, houskeeping takes place, an attempt is made to 
( initialize the DSP. If successful, the clock card is initialized through the 
( DSP. If not an error message is returned, and you might as well give up on 
( acquiring any image data or doing much else useful. A hardware failure is 
( the only likely cause of such difficulty. A sign on message is generated. 

( 

HEX 
: I NIT 

6104 200 6100 (2 6102 <2 - CMOVE 
6100 @ 6102 '2 - 6104 + 6 84 CMOVE 

STOP-TEMP-CTL 

DECIMAL 

VERSION 

FALSE EXPOSING ! 

INSTALL-TIMER INSTALL-TEMP-CTL 
START-TIMER START -TEMP-CTL 
0 CAM_ID C! 

20 ODELAY ! 20 CDELAY ! 

INIT-DSP 

FALSE DSP_OK ! { guilty until proven innocent ) 

DSP-OK? 

DSP_OK (2 
IF 

. " DSP ok revision : " DSP_REV (2 U. CR 

Cl SC -OFF 

INIT-STATES 

INIT-VOLTS 

I NIT -FORMAT 

ALL-CLKS-EN 

CAM-ID! 

ELSE 

. ” DSP NOT RESPONDING ... camera control functions not available " CR 
THEN 

. " AIS camera initialized " CR 






( ASTART ! 

HEX 

EPROM CONSTANT ASTART 


ASTART ! 

EEUNPROT 

A44A DUP ASTART EE- ! 

[ 1 RESTOR ] LITERAL CFA 
DICT-START - 
EEDICT-START + 

DUP ASTART 2+ EE- ! 

EEPROT 

CR . " autostart sequence stored 


( * UNPROTECT THE EEPROM 
( * STORE THE AUTOSTART PATTERN 
{ * GET THE CFA OF OUR AUTOSTART WORD 
( * DICT OFFSET OF AUTOSTART WORD 
( * LOCATION OF AUTOSTART WORD IN EEPROM) 
( * STORE AFTER THE AUTOSTART PATTERN 
( * PROTECT THE EEPROM 
" CR ; 


( 

( 

( 

( 

( 

( 

( 

( 

( 

( 


Short Form Commands 


A set of short form commands is provided which is particularly useful 
to those very familiar with the command set or for programmed hardware 
interfaces, such as the Advanced Technologies VMEbus interface. All commands 
in the set are abbreviated to three letters in order to maximize the transfer 
rate of comands between the host computer and the camera controller. 
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lomrands are grouped by classes. 

rhe class identifier, F, L, S, I , or C, 


is the first character in the name. 


commands that manipulate format parameters 
loweset level image acquisition routines 


: ST STORE ASTART ! ; 

: P! stores a parameter 

it expects the value and parameter on the stack 

: P ! 

DEPTH DUP 2 < 

IF 

CR . " needs the value and parameter on stack 
0 DO DROP LOOP 
ELSE 
DROP 

( STACK ) ( STACK ) PARAM ! I NIT -FORMAT 

THEN 


( C: Controller comnands 
: CXX COLD ; 

: CIN INIT ; 


restart the 68HC11 FORTH 
initialize the camera ) 


interpreter ) 


( S: System commands ) 

ST@ TEMP ! ; 

STC CCD-TEMP? ; 

ST ! TEMP ! ; 

: SCF Cl SC -OFF ; 

: SCT CISC-ON ; 

: SBF CRAB-OFF ; 

: SBT CRAB-ON ; 

: SSO 200 0 EXP_LEFT ! 

: SSC CLOSE ; 

( these system commands are specific to AIS and AIS2 cameras 
SIV I NIT -VOLTS ; ( initialize CAM voltages ) 

SIF INIT-FORMAT ; ( iniitialize format parameters ) 

SIS INIT -STATES ; ( initialize timing parameters ) 

SPD SET - PAR__DELAY S ; ( set the parallel delay times to a new value ) 


{ CCD temperature short form) 

{ CCD temperature long form) 

( set the CCD temperature ) 

( disable continuous clearing of the CCD ) 

{ enable continuous clearing of the CCD ) 

( disable clock recombination anti-bloming ) 
; enable clock recombination anti -blooming ) 

OPEN ; ( open the shutter ) 

( close the shutter ) 


( 


Format or parameter-related commands ) 


FP! PARAM 
FP@ PARAM @ U. ; 
FF? FORMAT? ; 

FSF INIT-FORMAT 


store a parameter ) 
fetch a parameter } 

fetch the format parameters in an ordered list 
initialize format parameters, redundant to SIF) 


L : Low- 

■level commands ) 


LPB 

PIX-BIN ; 

( bin N pixels ) 

LRB 

ROW-BIN ; 

( bin N rows ) 

LPC 

PIX-CLR ; 

( discard N pixels ) 

LRC 

ROW-CLR ; 

( discard N rows ) 

LPR 

PIX-READ ; 

{ read N pixels ) 

LPR 

ROW- READ ; 

( read N rows ) 

LCW 

CAM-WRITE ; 

( write a value to a camera address 

LCR 

CAM-READ ; 

( read a value from a camera address 


I : Image-oriented or data producing commands 
IIL EXPOSEJ2CD ; ( integrate light ) 

I ID I NTEGRATE_DARK ; ( integrate dark ) 
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IRD 

READ ? 

{ rad the image 

I CL 

CLEAR ; 

( clear the CCD 

IAB 

BIAS ; 

( acquire bias ) 

IAD 

DARK ; 

( acquire dark ) 

IAL 

OBS ; 

( acquire light ; 

special ones for AIS style cameras 

CEA 

CAM-ENABLE-ALL ; 


CEO 

CAMO CAM-ENABLE ; 


CE1 

CAM1 CAM-ENABLE ; 


CDA 

CAM-DISABLE-ALL ; 


CDO 

CAMO CAM-DI SABLE ; 


CD1 

CAM1 CAM-DISABLE ; 


ACE 

ALL-CLKS-EN ; 


ACD 

ALL-CLKS-DIS ; 
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off the CCD based on current format ) 
of all charge ) 


HERE U. 

DECIMAL 

0 0 TIME! 

0 0 EXP_LEFT! 
FALSE EXPOSING ! 


0 ACT_TMP ! 
150 DES_TMP ! 

0 TMP_CNT ! 

5 MAX_CNT ! 

0 DAC_VAL ! 
10 DAC_IN C ! 

FALSE DSP_0K ! 


2048 

CCD_SER 


1 

BIN_SER 


20 

PRE_SER 


0 

UNDER__SER 


0 

ORG_SER 


2048 

READ_SER 


20 

POST SER 


0 

OVER_SER 


2048 

CCD_PAR 


1 

BINJPAR 


0 

ORG_PAR 


2048 

READ_PAR 


0 

POST_PAR 


0 

OVER_PAR 


200 

PAR_DELAY 



100 

ODELAY 

100 

CDELAY 

200 

EXP TIMEJXO 

0 

EXP_TIME_HI 

2 

NUM CLEARS 

1 

NUM__IMAGES 

50 

IM DELAY^LO 

0 

IM_DELAY_HI 


FALSE CCLEAR ! 

FALSE ANTI -BLOOM ! 



o o o o o o 
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0 ARCH 
0 SPEED 


CAM0_PDIR 
CAM1_PDIR 
DSP__REV ! 
CAM_ID C! 
CTL_CAM0 C! 
CTL_CAM1 C! 


STORE 


Appendix B: 


Camera Controller DSP56001 Source Code 



aisdsp57.asm 
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DSP56001 Assembler source 
for the Advanced Imaging System 


Copyright 1990 
Advanced Technologies Inc. 

Peter Doherty 

In order to operate both channels and read out through both channels, 
certain limitations are placed on the read format. All subarrays are to 
be centered on the CCD. 

That simplifies things greatly, and the only issue now is direction of 
charge transfer. 


define revision '#>57' 

Include Files are Used to DEFINE and EQUate constants 
to be used in this source file. 

nolist 

include 'aisequ57.h' ; equates for i/o locations 

list 

include , aisdsp57.h' ; equates ror read data storage 

include *aisdsp57 .mac ' ; macro definitions 


; ; definitions of camera pointers 

define out_store 'x:(r3)' 
define id_Iatch ‘y: (r4) ' 
define ser_latch *y: (r5) ' 
define out_latch 'y : (r6) ' 
define ana_Iatch 'y: (r7) ' 


; ; Interrupt Service routine table 

This "Table" actually contains executable code. 

;; See DS56001 User's Manual chapter 8 for a discussion of 

;; exception processing. 

org p : $0000 

. . ******************************************************************** 
; ; interrupt routine table 

;; this "vector table" actually holds executable code 


jnp 

startup 

; ; cmd #0 

reset vector 

nop 

nop 


; ; cmd #1 

stack error 

nop 

nop 


; ; cmd #2 

trace interrupt 

nop 

nop 


; ; cmd #3 

software interrupt 

nop 

nop 


; ; cmd #4 : 

: irqa* 

nop 

nop 

jsr 

jsr 

sayOK 

cam_write 

; ; cmd #5 : 
; ; cmd #6 : 
; ; cmd #7 : 

: irqb* 

: DSP "OK" routine for system test 
: write host data to DSP address 
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cam_read 

volt_test 

cam_ctl 

init_volts 

init_states 

mytest 


; ; cmd #8 : fetch data from DSP address for host 
; ; cmd #9 : 

;; cmd #A : write to CAM control latch 
; ; cmd #B : 

; ; cmd #C : 

;; cmd #D : a word I use for testing stuff 
; ; cmd #E : 

; ; cmd #F : 

; ; cmd #10 : 

; ; cmd #11 : 


; ; Host interrupt routine table 


nop 




nop 


; ; cmd #12 

used as SHADE by ATC5 cameras 

jsr 

init_format 

; ; cmd #13 

initialize readout format 

jsr 

read 

; ; cmd #14 

read the CCD 

jsr 

clear 

; ; cmd #15 

clear the ccd 

jsr 

pix„bin 

; ; crnd #16 

bin N pixels 

jsr 

row_bin 

; ; cmd #17 

bin N rows 

jsr 

pix_discard 

; ; cmd #18 

discard N pixels 

jsr 

row_discard 

;; cmd #19 

discard N rows 

jsr 

pix_read 

; ; cmd #la 

read N pixels 

jsr 

row_read 

; ; cmd #lb 

read N rows 

nop 




nop 


; ; cmd # 1 c 

unused 

jsr 

shift_IS 

; ; cmd #ld 

shift image to storage (un implemented) 

jsr 

abloom 

; ; cmd #le 

perform clock recomb, anti -blooming 

nop 




nop 


;; cmd #lf : 





startup 

entry from dsp reset 


move #$200 ,r0 

jset #3 , x: hsr, init 

jclr #hrdf ,x:hsr,memf ill ; 

movep x:hrx,al 

movem al , p : ( rO ) + 

jmp memfill 


; if HFO is set, go initialize 
; else if no new host data, loop 
; else get the host data 
; store program word 


#$0200, SR 
#0 , x : bcr 
#10, x: ipr 
#11 , x: ipr 
#0 , x : pbc 


; ; min int level set to 2 
;; all external mem access 
; ; Host int set to . . . 

; ; priority level 2 
; ; set port b as Host port 


;; we use portc2/sclk as enable for camera diff drivers 
;; so we need to initialize it properly here. 

;; actually it doesn't make any difference. 


bset 

#2 , x : pcd 

; ; cam. 

_en low = 

camera enabled 


movep 

#$4,x:pcddr 

; ; set 

pc2/sclk 

as 

output 


movep 

#$lf8,X:pCC 

; ; set 

sci pins 

as 

i/o, ssi as 

ssi 

move 

#i_latch, r4 






move 

#o_jstore, r3 






move 

#s_latch, r5 






move 

#o_latch, r6 






move 

#a_latch, r7 






clr 

a 






move 

al,x: initialized 

; ; we ' 

haven 1 1 been 

initialized 

yet 
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bset 


#2,x:hcr 


; ; enable Host interrupts 


; mam program ^cop 
main 

bcir 

jclr 

jclr 

jclr 


cclear 


jclr 

jmp 


#bsy,x:hcr ;; clear dsp busy flag (hf 2 ) 

#states,x: initial ized,main 
#forrrat,x: initialized, main 
#voltages,x: initialized, main 

#cont_clear,x:hsr, cclear 
nain 


cclear 


host_int_di sable 
move #>1 , a 

jsr par_shift 

jsr ser^cl ear 

host_int_enable 
jmp main 


continuously clear the ccd 
disable host interrupts 
shift a row 

clear the serial register 
enable host int errupts 
back to main loop 


; ; my test word whatever it may happen to be at the moment 
rnytest 


move 

jsr 

rti 


#>1, a 
par_shift 






ser_read 


ser_read 

read A1 pixels 


destroys 

rO 


expects 

A1 = number 

of pixels to read 

calls 

pixel_read. 

next_A_state 

depends on 

nothing 


includes 

rst_hi,rst_: 

Lo, sbin, sw_lo, swjai 

jclr 

#states,x: initialized 

, _ser_read 

tst 

A ; 

; if nothing to do ... 

jeq 

__ser_read 

; ... do nothing. 

do 

A1 , _ser_read 


move 

#ana_stateO,rl 

; rl points at astate table 

nop 


; pipeline delay 

next_ana 

/ 

; two states before rest 

next_ana 



rst_hi 

; 

; reset 

rst_lo 



next_ana 



next_ana 


; two states after reset 

sbin 

; 

; shift binned serial pixel 

do 

#5,_sw ; 

; five states before summing 
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_p ixel 
_ser_read 


next_ana 

sw_lo 

sw_hi 

do #5,_pixel 

next_ana 

nop 

rts 


summing well 

five states after summing well 


ser_clear 

clears the serial register 


ser clear 


ser clear 


destroys 

A 

expects 

nothing 

calls 

ser_discard 

depends on 

L nothing 

includes 

nothing 

jelr 

# format , x : initialized, _ser_cl ear 

move 

x : ccd_ser , A 

jsr 

ser_discard 

rts 



. ********** ********* ********************************************************* 
ser_discard discard A1 pixels from serial register 


destroys 

expects 

calls 

depends on 
includes 


rO 

A1 = number of pixels to discard 

nothing 

nothing 

rst_hi, rst_lo, sw_hi, sw_lo, ser__shift 


ser_discard 

jelr #states, x: initial i zed, _ser_discard 

tst A 

ieq _ser_discard 


rstjii 

sw_hi 

do Al,_ser_dis 

ser_shift 


_ser_dis 


sw_lo 

sw_hi 


: ; rst_lo 

_ser_discard 


;; shift pixels 

;; clear out the summing well 
;; don't bother going low 
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rts 


. . I'l' + i'l'T'Xi'i'i'I'I'l'i'fXl'i'-**-************************************************-***** 

; par_read read A1 rows off the CCD 


par_read 

jclr *fcrxat,x: initialized, _par__read 


_par_read 


tst 

jeq 

A 

_par_read 

; ; if no rows to read 
; ; . . then do nothing 

do 

A1 , _par_read 


move 

jsr 

#>1, a 
par_bin 

; ; bin one row 

move 

jsr 

x:pre_ser,a 

ser_discard 

; ; serial pre-prescan 

move 

jsr 

x : under_ser , a 
ser_read 

; ; serial underscan 

move 

jsr 

x:org_ser,a 

ser_discard 

; ; serial prescan 

move 

jsr 

x:raad__ser,a 

ser_read 

; ; serial read 

move 

jsr 

x:posr_ser, a 
ser_discard 

; ; serial postscan 

move 

jsr 

x:over_ser,a 

ser_read 

; ; serial overscan 

nop 



rts 




. . ***** ********** ***** ******************* ***************** ***************** 
; par_discard discard the number of rows in acc A off the current ccd 


destroys rO 

expects A1 = number of rows to discard 
calls par_shift, ser_clear 

depends B,xO 


par_discard 

tst a 

jeq _clear 


if there's nothing to do... 
. . . do nothing. 


all_cams 


move 

move 

rst_hi 

jsr 

jsr 

jsr 

rst_lo 

nop 


#$aaaa,rO 
rO, ser_latch 

par_shif t 
ser_clear 
ser_idle 


enable all CAMs 


set all clocks to high 

shift parallels 

clear the serial register 

put serials back to idle 


rts 


return 
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par_bin bin A1 rows 


par_bin 


_par_bin 


destroys 

nothing 

expects 

A1 - number 

calls 

par_shift 

depends 

nothing 

jclr 

#format ,x: ii 

tst 

a 

jeq 

_par_bin 

do 

al,_par_bin 

move 

x:bin_par,a 

jsr 

par_shift 

rts 



; ; if nothing to do 
; ; ... do nothing. 


; par_shift shift A1 rows 



par_shi f t 


camO_rev 


init_camO 



caml_rev 


destroys 

o 

> 

b- 4 


expects 

Al = number of shifts to perform 


calls 

nothing 


depends 

nothing 


includes 

tg__hi, tg_lo 


jclr 

#states,x: initialized, _par_shift 


tst 

jeq 

a ; ; 

_par_shif t ; ; 

if no shifts to do... 
... do nothing. 

al l_cams 



rst_hi 

;; 

reset the output 

rep 

nop 

#100 

and hold it that way 
for a long while 

clamp_hi 

do 

al,_par_shift 

turn on the preamp clamp 

move 

jset 

move 

jmp 

#camO_par_stateO , rO 

# 0 , x : pdi r_cam0 , _cam0_r ev 

#l,n0 

_init_cam0 

rO points to camO parallel states 
if in reverse, init different 
in forward inc = 1 

rep 

move 

move 

move 

x:n_j?ar_states 
{ rO ) + 

(r0)- 

#$ffff,n0 

point 1 past end of state table 
point at last entry 
increment - -1 

move 

jset 

move 

jmp 

#caml_par_stateO , rl 

# 0 , x : pdi r_caml , _caml_r e v 

#l,nl 

_init_caml 

rl points to caml parallel states 
if in reverse, init different 
in forward inc = 1 

rep 

move 

x : n_par_states 
(rl) + 

point 1 past end of state table 
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move 

move 




point at last entry 
increment = -1 


move 

#par_wait0, r2 

move 

j?p_latch, r7 

do 

x : n_par_states , __par_loop 


; ; r2 points at parallel delay table 
; ; use r7 as pointer, must restore later 


; ; move the next state for camO 
camO_cnly 

jclr #tg_state_bi t , x : (rO) , 

tg_hi 

jmp _camO_next_p 

_camO_tg_lo 

tg_lo 

_camO_next_p 

move x:(rO)+nO,al 

move al,y: (r7) 


camO_tg_lo ;; if the next state doesn't 
; ; include transfer gate high. . 
don't set it high. 


; ; move a state, r7 points at latch 


; ; move the next state tor caml 
caml_only 


jclr 

tg_hi 

jnp 

caml_tg_lo 

tg_lo 

caml_next_p 

move 

move 


*tg_state_bit,x: 

_caml_next_p 

x : { r 1 ) +nl, al 
al,y: (r7 ) 


(rl) ,_caml_tg_io ;; if the next state doesn't 
;; include transfer gate high., 
don't set it high. 


; ; move a state 


rep x: (r2) + 

nop 

_j?ar__loop 

nop 

_par_shif t 

all_cams 

move sa_latch, r7 

clamp_lo 

rep #100 

nop 

rts 


do a wait 



restore a_latch ptr 
turn off the preamp clamp 

and hold it that way 
for a long while 


/ / 

; cmd 7 






cam_write accept data from host 
and write it to a DSP address 

expects address, then address space, then data 


destroys 

expects 

calls 

depends 


a, rO 


nothing 

host2a 

nothing 


; ; includes 

camjwrite 

busy 

jsr 

move 

jsr 

move 

jsr 

tst 

jeq 


nothing 


host 2a 

; ; get the address 

al,rl 


host2a 

; ; get address space 0=X. 

a,b 


host2a 

; ; get the data 

b 

; ; test address space ID 

_writeX 

; ; if space = 1 


1=Y 



I 
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writeX 


_cam_write 


move 

jnp 

move 

a 

rti 


al,y: (rl) 
_cam_write 

al,x: (rl) 


; ; . . * write to Y ram 
; ; ... then return 
; ; else 

; ; ... write to X ram 
; ; return 


. ****** 
cmd 8 




cam_read 


_readX 

_cam_read 


cam_read 

get data 

for host 

destroys 

a, rl 

expects 

expects 


nothing 

calls 


a2host / 

depends 


nothing 

includes 

nothing 


busy 

jsr 

host 2a 


move 

al, rl 


jsr 

host2a 


tst 

a 


jeq 

_readX 


move 

y: (rl) ,al 


jmp 

_cam_read 


move 

x: (rl) ,al 


jsr 

a2host 


rti 




get the address 

get address space 0=X, 
test address space ID 
if space = 1 
. . . read from Y ram 
. . . then return 
else 

. . . read from X ram 

send data to host 
return 


L=Y 


. ********************************************************************* 
cmd 9 : volt_test 

test the DAC's on the current CAM 

destroys a, rO, xl 

expects 

calls 

depends 

includes 

volt test 


;; point at first address 

; ; write to seq addresses 
; ; increment a 


clr 

a 

move 

#>l,xl 

move 

#$fff ,x0 

move 

#par_lo, rO 

rep 

#24 

move 

al,y: (r0)+ 

add 

xl , a 

rep 

nop 

xO 


;_volt_test 
jnp 
rti 


_testl 


; ; go do it some more 
; ; THERE ' S NO WAY OUT OF HERE ! ! ! ! 
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; cmd OxCA : cam_ctl 


write tc the CAM control latch of current CAM 

destroys a, rO, xl 

expects 

calls 

depends 


includes 


move 

#c_latch, 

jsr 

host 2a 

move 

al#y: (rO: 

rti 



point at control latch 
get the datum 
store it 


; ; cmd OxOB : init_volts 






gets the ccd voltages from the Host and writes them to the DACs. 
see aisdsp.h for the order in which they must arrive. 


init_volts 


volts 


destroys 

rl 

expects 

nothing 

calls 

host2a 

depends 

rl 

includes 

nothing 

busy 

movep 

move 

do 

jsr 

move 

#$ffff ,x:bcr 
#par_lo, rl 
#n_volts,_volts 
ho st 2a 
al#y : {rl ) + 

movep 

#0,x:bcr 

al l_cams 

bset 

rti 

#voltages,x: initialized 


setup wait states 
point rl at par_lo 
do loop n_volts times 

set DAC, increment DAC ptr 

back to 0 wait states 






; HV3: ini testates 

; ; gets parrallel states and waits# serial states, 

and analog states and waits from Host, stores them 

; ; in x memory 

; ; destroys rl 

; ; expects nothing 

;; calls host 2a 

; ; depends rl 


*** 


includes 


nothing 
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init_states 



busy 



jsr 

host2a 


move 

al , x : n_par_states 


move 

al , bO 



_camO 

move 

do 

jsr 

move 

#camO_par_stateO, rl 
bO , _camO 
host 2a 
al,x: (rl ) * 

_caml 

move 

do 

jsr 

move 

#caml_par_stateO , rl 
bO , __caml 
host 2a 
al , x: (rl) + 

move 

do 

jsr 

move 

_par_waits 

#par_waitO, rl 
bO,_j?ar_waits 
host2a 
al,x: (rl) + 

_ser_init 

jsr 

move 

move 

do 

jsr 

move 

host 2a 

al,x:n_ser_states 
#ser_stateO, rl 
al,_ser_init 
host2a 
al,x: (rl) + 


jsr 

move 

move 

jsr 

host2a 

al , x : n_ana_states 
rrana_stateO , rl 
state_lcop 


jsr 

move 

move 

jsr 

host2a 

al , x : n_ab_states 
#ab_stateO, rl 
state_loop 


bset 

rti 

#states,x: initialized 


1902 9:42 AM 10 

get the number of Parallel states 
get the states for camO 

get the states for caml 

get the parallel clock delays 

get the number of serial states 

get the serial states 
. . . one at a time. 

get the number of analog states 
get the number of ab states 
states are initialized now 


. . ***************************************************************************** 
; cmd 12 : shade 

;; used by ATC5 cameras, not implemented in AIS or AIS2 cameras 
shade 

rti 


. . ***************************************************************************** 
; cmd 13 : init_format 

; ; acquire a new set of readout data from Host 

;; including: 

; ; ccd_ser 

; ; bin_ser 


; serial register length 
; serial binning number 
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pre_ser 

serial register extension length 

under_ser ; 

serial register underscan 


org_ser 

serial prescan length 


read_ser 

serial read length 


post_ser ; 

serial postscan length 


over_ser 

serial register overscan 


ccd__par 

parallel register length 


bin_par 

parallel binning number 


org_oar 

parallel prescan length 


read_par 

parallel read length 


post _par 

parallel postscan length 


over_par ; 

parallel register overscan 


pdir_CAM0 ; 

parallel shift direction for 

CAMO 

pdir_CAMl ; 

parallel shift direction for 

CAM1 

n_fmt_params equ 18 



; ; destroys 

; ; expects 

;; calls 

; ; depends 

; ; includes 

init_format 

busy 

move 

do 

jsr 

move 

^format 

bset 

rti 


rl 

nothing 

host2a 

rl 

nothing 

#ccd_ser, rl 
#n_fmt_params , _f orma t 
host2a 
al , x: (rl) + 

#format,x: initialized 


******** ****** **** ************* ********************************************** 
cmd 14: read 

reads the ccd out depending on the format parameters 
destroys A 
expects nothing 

calls par_discard, ser_clear, pbin, ser_discard, ser_read 

depends nothing 
includes nothing 


read 


busy 


jsr 

par_idle 

jsr 

ser__idle 

jclr 

#format,x: ii 

move 

x : org_j?ar , a 

jsr 

par_discard 

jsr 

ser_clear 


; ; set dsp busy flag 

;; put paralles into idle state 
;; put serials into idle state 


; ; parallel prescan 


; ; clear ser reg again 
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move 

x:read_par, a 

; ; read rows 

jsr 

par_read 


move 

x:post_par,a 

;; parallel postscan 

jsr 

par_discard 


rti 










; cmd 1 5 


: clear 

clear Che ccd imager 
destroys A 
expects nothing 
calls par_dis 
depends nothing 
includes nothing 


clear 


busy 

jsr 

jsr 


par_idle 

ser_idle 


put paralles into idle state 
put serials into idle state 


_clear 


jclr 

move 

jsr 

rti 


#format,x: initialized,_clear 

x:ccd_par,A 

par_discard 






; cmd 16 : pixjoin 

;; bin N pixels 

; ; destroys 

; ; expects 

;; calls 

; ; depends 

; ; includes 


al 

nothing 

host2a 

nothing 

sw_hi , ser_shi f t 


pix_bin 

busy 

jclr #states,x: initialized, _pix_bin 

jsr ho st 2a 

do al,_pix_Jbin 

ser_shif t 

_pix_bin 


rti 
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; end 17 : row_bin 


shirt M rows 
destroys 
expects 
calls 


depends 


includes 


al ,A1 
nothing 

host 2a, par_shift 

nothing 

nothing 


rcw_bin 

busy 

isr host2a 

jsr par_shift 

_row_bin 

rti 


. ****************************** 




; end 18 : pix__discard 


discard N 

pixels 

destroys 

A 

expects 

nothing 

calls 

host2a / 

depends 

nothing 

includes 

nothing 


ser_discard 




pix_discard 

busy 


jsr host2a 

jsr ser_discard 

_pix_discard 
rti 


errd 19 : row_discard 

discard N rows 
destroys A 
expects nothing 
calls par_discard, ser_clear 

depends nothing 
includes nothing 




row_discard 

busy 

jsr 

jsr 

_row_discard 

rti 


host2a 

par_discard 
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; and la 


pix_read 


_pix_read 


: pix_read 


read N pixels 

destroys 

A 

expects 

nothing 

calls 

host2a, ser_read 

depends 

nothing 

includes 

nothing 

busy 

jsr 

jsr 

host2a 

ser__read 

rti 



. . ******************************************************************* 
; and IB : row_read 

; ; read N rows 

; ; destroys 

expects nothing 

calls host2a, par_bin, ser_discard, ser_read 

depends 
includes 



row_read 

busy 

jsr host2a 

j sr par_read 

_rcw_read 

rti 


; and lc : unused 


.. ******************************************************************* 
; and Id : shift_IS 

;; shift image to storage on a frame transfer device 

; ; un imp 1 ement ed 

shift_IS 

rti 



**************************************************************** ************* 
and Oxle : abloom perform clock recombination anti blooming 


destroys 
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abloom 


_ao_prep 


expects 

calls 

depends 

includes 


icir 

jclr 

all_cams 

move 

move 

do 

move 

move 

rep 

nop 

jset 
no cams 


#states, x: initialized, _abloom 
#voltages,x: initialized, _abloom 

#p_latch, rl 

#ab_stateO, rO 

x : n_ab_s cates , _ab_loop 

x:(rO)+,xG 

xO,y:(rl) 

x: (rO) + 


# continue , x : hsr , _ab_prep 


ab state 0 to xO 

then to parallel clock latch 


do clock recomb. anti -blooming? 


_ab_loop 


abloom 




* state_loop 

assumes xO holds the number of states and waits to get 
destroys rl 

expects al = number of state/wait pairs to get 
rl - pointer to state/wait table 


calls 

host2a 


depends 

rl 


includes 

nothing 


) 

do 

al,_state_loop 


jsr 

host2a 

; ; get a state 

move 

al , x: (rl) + 

; ; get a wait time 

jsr 

host2a 

move 

al , x: (rl) + 



_state_loop 

rts 


******************************************************************* 

host2a 

Waits for data from the Host 
Moves the data into a 

destroys a 

expects nothing 

calls nothing 

depends nothing 


host2a 
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clr a 

jclr #hrdf ,x:hsr,host2a 

movep x:hrx,al ;; get the data into al 

rts 


******************************************************************* 

a2host 

Moves data from register al to the Host 
destroys nothing 
expects al to hold useful data 
calls nothing 
depends nothing 

note this is not presently used, but this is how you'd do it. 


a2host 

jclr #htde,x:hsr,a2host 

movep al , x: htx 

rts 


. . * * * 




;; par_idle 

; ; destroys 

; ; expects 

;; calls 

; ; depends 


sets the parallel clocks to the idle state 
xO,rO,a 


nothing 

nothing 


par_idle 

jclr #states,x: initialize 

move #p_latch,rl 

camO_only 

move #camO_par_stateO, rO 

rep x:n_par_states 

move (r0} + 

move ( r 0 ) - 

nop 

move x: (rO) , al 

move al,y: (rl) 

caml_only 

move #caml_par_stateO , rO 

rep x:n_par_states 

move (r0)+ 

move (rO)- 

nop 

move x: (rO) ,al 

move al,y: (rl) 

all_cams 

_par_idle 

rts 


>d,_par_idle 


; ; enable camO 

;; rO points at parallel state table 

; ; rO now points at place PAST table 

; ; rO now points to last place IN table 

; ; put that state into a 
;; write the idle state to camO 

; ; enable caml only 

;; rO points at parallel state table 

; ; rO now points to place PAST table 

;; rO now points to last place IN table 

; ; move that state to a 
;; write the idle state to caml 




; ; ser_idle 


sets the serial clocks to the idle state 


destroys xO,rO,a 
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expects 

calls 

depends 


not rung 
nothing 


ser_idle 


_ser_iais 


jclr 

all_ cams 

move 

rep 

move 

move 

move 

move 

rts 


Estates, x: initialized, _ser_idle 

#ser_stateO,rO 

x : n ser states 

(rO) t- 
(rO) - 
x: (rO) ,a 
al, ser_latch 


■Xie****'******'* 

cmd 








sayOK 


sayOK 

respond to 6811 for 

test purposes 

allows 6811 to test 

if DSP is ope 

clr 

a 


move 

#$4f ,al 


jsr 

a2host 

; ; 

move 

#$4b, al 


jsr 

a2host 

; ; 

move 

revision, al 


jsr 

rti 

a2host 

• * 


say 1 0 ' 
say ' K ' 

pass revision number 
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;; aisdspBl.mac 

;; macro definitions for use with aisdsp51.asm 


host_int_enable MACRO 

bset #2,x:hcr 
ENDM 


host_int_di sable MACRO 

bcir #2,x:hcr 
ENDM 


; ; NOTE : 

;; in all of these macros it is assumed that r3 points to out_store, 

; ; the internal memory lcation we use to store the last value written 
; ; to the output latch on the clock card- 


; ; rst_hi 


; ; set 
rst _hi 


the CCD reset gate high 
MACRO 

bset #rst_bit , out_store 

move out_s t ore , y 0 

move yO,out_latch 

ENIM 


;; rst_lo 


; ; set the CCD 
rst_lo MACRO 
bclr 
move 
move 
ENDM 


reset gate low 

#rst_bit , out_store 

out_stcre,yO 

yO, outmatch 


; ; sw_hi 


; ; set the CCD 
sw_hi MACRO 
bset 
move 
move 
ENDM 


summing well high 

#sw_bit , out_store 
out_store,yO 
yO, out_latch 


;; sw_lo 


; ; set the CCD 

sw lo MACRO 

bclr 

move 

move 

ENDM 


summing well low 

#sw_bit , out_store 
out_store,yO 
yO, out_latch 


; ; tg_hi 


; ; set 

the CCD 

transfer gate high 

tg_hi 

MACRO 



bset 

#tg_bit, out_store 


move 

out_store,yO 


move 

ENDM 

yO, out_latch 


; ; tg_lo 

; ; set the CCD transfer gate low 
tg_lo MACRO 

bclr #tg_bit, out_store 
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move 

move 

enem 


cut_store, yO 
yO, cut_Iatch 


; ; clamp__lo 


;; set the preamp clamp bit low (clamp off) 


cIamp_lo 

bclr 

move 

move 


MACRO 

$clamp__bit, out__store 

out_store,yO 

yO, out_latch 


ENCM 


; ; clamp_hi 


set the preamp clamp bit high 


(clamp on) 


clamp_hi 


bset 

move 


move 


MACRO 

#clamp_bit, out_store 

out_store,yO 

yO, out_latch 


ENEM 


; ; ser_shift 

;; shift one serial pixel 

; ; operates the same on all cams simultaneously 


ser_shift 

MACRO 

move 

#ser_stateO , rO 

nop 


move 

X: ( rO ) + , a 

do 

x : n_s er_s t a t es , _s_shi f t 

move 

x:(rO)+,a a,ser_latch 

_s_shift 


nop 


ENDM 


; ; sbin 


; ; bin one ser 

ial superpixel 

sbin MACRO 


do 

x : bin_ser , _s_bin__l oop 

ser_shift 


s_bin_loop 

ENEM 


; ; next Analog state macro 
; ; destroys A 

expects rl points at next analog state 



MACRO 

move 

x: (rl)+,Al 

move 

Al, ana_latch 

rep 

nop 

ENDM 

X: (rl) + 


astate in 
analog state out 
perform await 


; ; busy flag for host 
busy MACRO 

bset #3,x:'ncr ;; set the DSP busy flag 

ENEM 
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; ; macros for s 

electing clock/analog modules 


all_cams 

MACRO 

move #>$0,y0 
move yO , id_latch 
EMM 


no_cams 

MACRO 

move #>$ff,yO 
move yO,id_latch 
EMM 


camO_only 

MACRO 

move #>$fe,yO 
move yO , id_latch 
EMM 


caml_only 

MACRO 

move #>$fd,yO 
move yO,id_latch 
EMM 


; ; cam2_only 

MACRO 

move #>$fb,yO 
move yO,id_latch 
EM)M 


; ;cain3_only 

MACRO 

move #>$f7,y0 
move yO,id_latch 
EMM 


; ; cam4_only 

a ;; 

MACRO 

move #>$ef,yO 
move yO , id_latch 
EMM 


; ; cam5_only 

MACRO 

move #>$df,yO 
move yO , id_latch 
EMM 


>1 

i — i 

g , 

1 

u 

MACRO 

move #>$bf,yO 
move yO,id_latch 
EMM 


; ; cam7_only 

MACRO 

move #>$7f,y0 
move yO,id_latch 
EMM 


; ; end of macro 

definitions 
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; motorola standard i/o equates. 

.T'i'l'T'i'X + wticwi'-xl'i'-Kiei'i'**-**********-*-*****'*'*'*-***********-****** ************** 

• equates for dsp56000 i/o registers and ports 

' ************************************************************************ 


equates for i/o port programming 


register addresses 


ber 

equ 

$fffe 

pbc 

equ 

$f feO 

pbddr 

equ 

$f fe2 

pbd 

equ 

$ffe4 

pcc 

equ 

$f fel 

peddr 

equ 

$ffe3 

ped 

equ 

$f fe5 


port a bus control register 
port b control register 
port b data direction register 
port b data register 
port c control register 
port c data direction register 
port c data register 


equates for host interface 


her 

hsr 

hrx 

htx 


hrie 
htie 
heie 
hf 2 
hf 3 


hrdf 

htde 

hep 

hf 

hf 0 

hf i 

dma 


register addresses 


equ $ffe8 
equ $ffe9 
equ $ffeb 
equ $ffeb 


host control register 
host status register 
host receive data register 
host transmit data register 


host control register bit flags 


equ 0 

equ 1 

equ 2 

equ 3 

equ 4 


host receive interrupt enable 
host transmit interrupt enable 
host command interrupt enable 
host flag 2 
host flag 3 


host status register bit flags 


equ 

0 

; host receive data full 

equ 

1 

; host transmit data empty 

equ 

2 

; host command pending 

equ 

$18 

; host flag mask 

equ 

3 

; host flag 0 

equ 

4 

; hest flag 1 

equ 

7 

; dma status 


equates for serial communications interface (sci) 


register addresses 


srxl 

equ 

$f f f 4 

; SCi 

srxm 

equ 

$f f f 5 

; sci 

srxh 

equ 

$f f f 6 

; SCi 

stxl 

equ 

$f f f 4 

; sci 

stxm 

equ 

$f f f 5 

; sci 

stxh 

equ 

$f f f 6 

; sci 

stxa 

equ 

$fff3 

; sci 

scr 

equ 

SfffO 

; sci 

ssr 

equ 

Sfffl 

; sci 

sccr 

equ 

$fff2 

; sci 


receive data register (low) 
receive data register (middle) 
receive data register (high) 
transmit data register (low) 
transmit data register (middle) 
transmit data register (high) 
transmit data address register 
control register 
status register 
clock control register 
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sci control register bit flags 


wds 

equ 

$3 

wdsO 

equ 

0 

wdsl 

equ 

1 

wds 2 

equ 

2 

sbk 

equ 

4 

wake 

equ 

5 

rwi 

equ 

6 

woms 

equ 

7 

re 

equ 

8 

te 

equ 

9 

ilie 

equ 

10 

rie 

equ 

11 

tie 

equ 

12 

tmie 

equ 

13 


word select mask 

word select 0 

word select 1 

word select 2 

send break 

wake-up mode select 

receiver wake-up enable 

wired- or mode select 

receiver enable 

transmitter enable 

idle line interrupt enable 

receive interrupt enable 

transmit interrupt enable 

timer interrupt enable 


; 

sci 

status 

register bit 

flags 

tme 

equ 

0 

- 

transmitter empty 

tdre 

equ 

1 

; 

transmit data register 

rdrf 

equ 

2 

; 

receive data register 

idle 

equ 

3 

; 

idle line 

or 

equ 

4 

; 

overrun error 

pe 

equ 

5 

; 

parity error 

fe 

equ 

6 

; 

framing error 

r8 

equ 

7 


received bit 8 

; 

sci 

clock 

control register bit flags 

cd 

equ 

$fff 

; 

clock divider mask 

cod 

equ 

12 

; 

clock out divider 

scp 

equ 

13 

; 

clock prescaler 

rcm 

equ 

14 

; 

receive clock source 

tern 

equ 

15 

; 

transmit clock source 


empty 

full 


equates for synchronous serial interface (ssi) 


register addresses 


rx 

equ 

$f fef 

; serial receive data register 

tx 

equ 

$f fef 

; serial transmit data register 

era 

equ 

$f fee 

; ssi control register a 

erb 

equ 

$ f f ed 

; ssi control register b 

str 

equ 

$f fee 

; ssi status register 

tsr 

equ 

$ffee 

; ssi time slot register 

; 

ssi 

control register 

a bit flags 

pm 

equ 

$ff 

; prescale modulus select mask 

dc 

equ 

$lf00 

; frame rate divider control mask 

wl 

equ 

$6000 

; word length control mask 

wlO 

equ 

13 

; word length control 0 

wl 1 

equ 

14 

; word length control 1 

psr 

equ 

15 

; prescaler range 

; 

ssi 

control register 

b bit flags 

of 

equ 

$3 

; serial output flag mask 

of 0 

equ 

0 

; serial output flag 0 

of 1 

equ 

1 

; serial output flag 1 

sed 

equ 

$lc 

; serial control direction mask 

scdO 

equ 

2 

; serial control 0 direction 

scdl 

equ 

3 

; serial control 1 direction 

scd2 

equ 

4 

; serial control 2 direction 

sekd 

equ 

5 

; clock source direction 

f si 

equ 

8 

; frame sync length 

syn 

equ 

9 

; sync/async control 

gck 

equ 

10 

; gated clock control 
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mod 

equ 

11 

ste 

equ 

12 

sre 

equ 

13 

stie 

equ 

14 

srie 

equ 

15 

; 

ssi 

stati 

if 

equ 

$2 

if C 

equ 

0 

if 1 

equ 

i_ 

tfs 

equ 

2 

rf s 

equ 

3 

tue 

equ 

4 

roe 

equ 

5 

tde 

equ 

6 

rdf 

equ 

7 


status register bit 


mode select 

ssi transmit enable 

ssi receive enable 

ssi transmit interrupt enable 

ssi receive interrupt enable 

flags 

serial input flag mask 
serial input flag 0 
serial input flag 1 
transmit frame sync 
receive frame sync 
transmitter underrun error 
receiver overrun error 
transmit data register empty 
receive data register full 


equates for exception processing 


register addresses 


equ $ffff 


interrupt priority register 


interrupt priority regi 


ster bit flags 


ial 

equ 

iaiO 

equ 

iall 

equ 

ia!2 

equ 

ibl 

equ 

iblO 

equ 

ibll 

equ 

ibl2 

equ 

hpl 

equ 

hplO 

equ 

hpll 

equ 

; ; ssi e 

sslO 

equ 

ssll 

equ 

sci 

equ 

sclO 

equ 

sell 

equ 


$7 

0 

1 

2 

$38 

3 

4 

5 

$c00 

10 

11 

$3000 

12 

13 

$c000 

14 

15 


irqa mode mask 

irqa mode interrupt priority level (low) 
irqa mode interrupt priority level (high) 
irqa mode trigger mode 
irqb mode mask 

irqb mode interrupt priority level (low) 
irqb mode interrupt priority level (high) 
irqb mode trigger mode 
host interrupt priority level mask 
host interrupt priority level mask (low) 
host interrupt priority level mask (high) 
; ssi interrupt priority level mask 
ssi interrupt priority level mask (low) 
ssi interrupt priority level mask (high) 
sci interrupt priority level mask 
sci interrupt priority level mask (low) 
sci interrupt priority level mask (high) 
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; aisdsp.h 

; an equate file with definitions for the 
; variable storage locations used in aisdsp.asm 

ORG x : 0 


ccd_ser 

ds 


1 serial register length 

bin_ser 

ds 

1 

; serial binning number 

pre_ser 

ds 

X 

; serial register extension length 

under_ser 

ds 

2 

; serial register underscan 

org_ser 

ds 

1 

; serial prescan length 

read_ser 

ds 

1 

; serial read length 

post_ser 

ds 

1 

; serial postscan length 

over_ser 

ds 

1 

; serial register overscan 

ccd_par 

ds 

J. 

; parallel register length 

bin_par 

ds 

1 

; parallel binning number 

org_par 

ds 


; parallel prescan length 

read_par 

ds 

1 

; parallel read length 

post_par 

ds 

1 

; parallel post scan length 

over_par 

ds 

l 

; parallel register overscan 

pdir_camO 

ds 

X 

; parallel shift direction for CAMO 

pdir_caml 

ds 

1 

; parallel shift direction for CAM1 

n_fmt_params 

equ 

16 


ORG X: 20 




tenpO 

ds 

X 

; a useful, very temporary storage 


;; the following location "initialized" is a set of bits that we can 

;; test to see if various things have been initialized. We would not 

; ; want to manipulate parallel clocks or do a readout if the states 
; ; have not been initialized, for instance, we would not want to turn 

; ; the clocks on if they have not been initialized, nor would we 

; ; want to do a readout if the format has not been initialized. 

;; bit 0 = states bit 1 = format bit 2 = voltages 

;; bits will be set to a one when the related parameters are initialized 
;; and will be cleared otherwise. 


initialized 


ds 

1 

states 

equ 

0 


format 

equ 

1 


voltages 

equ 

2 



; storage for our state counts, 

; ; they must be here so we can use direct addressing 

ds 1 

ds 1 

ds 1 

ds 1 

ds 1 ; storage for output latch data 


n_par_states 

n_ser_states 

n_ana_states 

n_ab_states 

o_store 


; parallel shift control constant storage locations 


ORG X: $40 



camO_par_stateO 

ds 

1 

cam0_par_s ta t e 1 

ds 

1 

cam0_par_state2 

ds 

1 

cam0_par_s tat e3 

ds 

1 

cam0_par_state4 

ds 

1 

camO_par_s ta t e 5 

ds 

1 

cam0_par_s ta t efo 

ds 

1 

cam0_par_state7 

ds 

1 

cam0_par_s ta t e S 

ds 

1 



2 
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cam0_par_state3 

ds 

1 

caml_par_stateO 

as 

1 

caml _j?ar_statel 

as 

1 

cami_par_state2 

as 

1 

caml_par_state3 

ds 

1 

caml_par_state4 

ds 

1 

caml _par_state5 

ds 

1 

caml_par_state6 

ds 

1 

caml_par_s tat e7 

ds 

1 

caml_par_stateS 

ds 

1 

caml_par_stace9 

ds 

1 


par_waitO 

ds 

1 

par_waitl 

ds 

1 

par_wait2 

ds 

1 

par_wait3 

ds 

1 

par_wait4 

ds 

1 

par_wait5 

ds 

1 

par_wait6 

ds 

1 

par_wait7 

ds 

1 

par_wait8 

ds 

1 

par_wait9 

ds 

1 
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* serial shift control constant storage locations 


for now there will be NO serial wait states performed 
ORG x : $ 8 0 


ser_stateO 

ds 

1 

ser_statel 

ds 

1 

ser_state2 

ds 


ser_state3 

ds 

1 

ser_state4 

ds 

1 

ser_state5 

ds 

1 

ser_state6 

ds 

1 

ser_state7 

ds 

1 

ser_state8 

ds 

1 

ser_state9 

ds 

1 

; analog control 

constant storage locations 

ORG x:$aO 

ana_stateO 

ds 

1 

ana_waitO 

ds 

1 

ana_statel 

ds 

1 

ana_waitl 

ds 

1 

ana_state2 

ds 

1 

ana_wait2 

ds 

1 

ana_state3 

ds 

1 

ana_wait3 

ds 

1 

ana_state4 

ds 

1 

ana_wait4 

ds 

1 

ana_state5 

ds 

1 

ana_wait5 

ds 

1 

ana_state6 

ds 

1 

ana_wait6 

ds 

1 

ana_state7 

ds 

1 

ana_wait7 

ds 

1 

ana_state8 

ds 

i 

X 

ana_wait8 

ds 

1 

ana_state9 

ds 

1 

ana_wait9 

ds 

1 


ab_states and ab_waits are constants used in 
clock recombination anti -blooming mode 


i 
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ORG 

X: $cQ 


ab_stateO 

ds 

1 

ab_waitO 

ds 

1 

ab_statel 

ds 

I 

ab_waitl 

ds 

1 

ab_state2 

ds 

1 

ab_wait2 

ds 

1 

ab_state3 

ds 

1 

ab_wait3 

ds 

1 


; ; equates 

for off chip 

locatio: 

; ; equates 

for clock board dacs 

n_volts 

equ 24 


par_lo 

equ 

$ff08 

par_mid 

equ 

$f f 09 

par_hi 

equ 

$f fOa 

ser_lo 

equ 

$f fOb 

ser_raid 

equ 

$f fOc 

ser_hi 

equ 

$ffOd 

tg_lo 

equ 

$f fOe 

tg_hi 

equ 

SffOf 

sw_lo 

equ 

$ffio 

sw_hi 

equ 

$ffll 

sub 

equ 

$f f 12 

lg 

equ 

$ffl3 

rst_lo 

equ 

$f f 14 

rst_hi 

equ 

$ffl5 

vrd 

equ 

$ffl6 

vod 

equ 

$f f 17 

xlJLo 

equ 

$f f 18 

xljii 

equ 

$ffl9 

x2_lo 

equ 

$f fla 

x2_ni 

equ 

$f f lb 

x3_lo 

equ 

$fflc 

x3_hi 

equ 

$f f Id 

x4_lo 

equ 

$f fie 

x4__hi 

equ 

$fflf 


including latches and dacs 


; ; equates for clock board latches 


i_latch 

equ 

$ff00 


s_latch 

equ 

$ff20 


p_latch 

equ 

$f f 24 


o_latch 

equ 

$ff28 


a_latch 

equ 

$ff2c 


c_latch 

equ 

$ff30 


; equate for bit 

numbers 

used in bitset commands 

; bits in < 

output 

control 

latch 

tg_bi t 

equ 

0 


swjoit 

equ 

1 


rst_bit 

equ 

n 


clamp_bit 

equ 

3 


extra2_bit 

equ 

4 


extra3_bit 

equ 

5 


extra4_bit 

equ 

6 



; ; equates for host control flags used to enable 

; ; continuous clear and clock recombination 

; ; anti-blooming 

control ear equ 3 ; ; hf 0 

continue equ 4 ; ; hf 1 


; ; equate for host flag 2 

;; used to tell the host when the DSP is busy 
bsy equ 3 ; ; hf 2 


; ; equate for the eighth bit in the parallel 
;; states . This bit tells the DSP when to 
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; ; set the transfer gate high 
tg_state_bit equ 3 
clamp_state_bit equ 9 


;; par_group is the number of parallel . shifts 
; ; to perform as a group in parallel discards 
par _group equ 10 


Appendix C: VMEbus Interface Board Source Code 



HEX 

7400 TIB ! 
200 TIB 2+ ! 
7600 DP ! 


( ATDvme .FOR forth code to run on the ATD VME interface board ) 

( ) 

( c Copyright 1991 ) 

( Advanced Technologies Inc. ) 

( P. Doherty, H. Meyer ) 

( ) 

( REV. 4 modified for three-letter command abbreviations ) 

( ) 

( REV. 3 changed the way the address switches work > 

( > 

( REV. 2 fixed up serial text data transfers ) 

( added error checking ) 

( added separate error register ) 

{ changed SEND STRING, function to one character at a time ) 

( ~ ) 

< > 

( REV. 1 modified ATCVMER17 . for vme code for ATC5 cameras ) 

( so that it will work with both the ATC5 cameras and ) 

( AIS style cameras running rev 5 or higher ) 

( > 

^ * ★★*•**•***★'*★★*★***★★***★***★*★★*■*■*■*★*★*★'**■'*★'****'**■****************'***'** ) 


0 CONSTANT FALSE 

1 CONSTANT TRUE 

( * useful words for performing bit manipulations 

( * these words operate on the number currently on the top of the stack. 


( 


( 


( 


* MASK-X 

leaves 

true 

MASK-7 

0080 

AND 

MASK-6 

0040 

AND 

MASK-5 

0020 

AND 

MASK-4 

0010 

AND 

MASK-3 

0008 

AND 

MASK-2 

0004 

AND 

MASK-1 

0002 

AND 

MASK-0 

0001 

AND 

* T-X makes certain : 


if bit x set else false 


x is true regardless of current state ) 


T-7 0080 OR ; 

T-6 0040 OR ; 

T-5 0020 OR ; 

T-4 0010 OR ; 

T-3 0008 OR ; 

T-2 0004 OR ; 

T-l 0002 OR ; 

T-0 0001 OR ; 

* F-X makes certain bit x is false regardless of current state ) 
F-7 FF7F AND ; 

F-6 FFBF AND ; 

F-5 FFDF AND ; 

F-4 FFEF AND ; 

F-3 FFF7 AND ; 

F-2 FFFB AND ; 

F-l FFFD AND ; 

F-0 FFFE AND ; 


{ *★*★★★***•**★★*•*★★*★***★★★ INTERRUPT READ ********************************************** ) 
( the following variables belong to the interrupt read routines ) 


B02D CONSTANT SCCR2 
B02E CONSTANT SCSR2 
B02F CONSTANT SCDR 


( SCI control register 2 ) 

( SCI status register 2 ) 

( the read / write register ) 


B7BF CONSTANT SCI_INT_LINK 

VARIABLE WRITE_PO INTER 
VARIABLE RE AD_PO INTER 
VARIABLE BUFFER_BOTTOM 
VARIABLE BUFFER_TOP 
VARIABLE BUFFER_LENGTH 

VARIABLE CR_FLAG 
VARIABLE QM_FLAG 
VARIABLE OK FLAG 


( SCI interrupt link ) 

( variables for read buffer ) 


HERE BUFFER BOTTOM ! 


FE ALLOT 

HERE BUFFER TOP ! 


{ WRITE -BUFFER writes into textbuffer. It accepts characters until the buffer is full. ) 

( This routine is called by the Interrupt read word ) 

{ expects value on stack ) 

: WRITE -BUFFER 

WRITE _P0 INTER 0 

DUP 1+ DUP BUFFERJTOP 0 - IF BUFFER_LENGTH g - THEN RE AD_PO INTER 0 - NOT 
IF 

C! WRITE_PO INTER 0 1+ ( write data into buffer and advance pointer ) 

DUP BUFFERJTOP 0 - IF BUFFER_LENGTH 0 - THEN WRITE_PO INTER ! ( wrap if buffer end ) 
ELSE 

DROP DROP { ignore data if buffer is full ) 

THEN 


( READ-BUFFER reads from text buffer. If buffer is empty a zero is returned ) 

( It does not wait for the next available character if buffer is empty ) 

{ If READ_POINTER 0 and WRITE_POINTER 0 are equal, the buffer is empty ) 

( returns value on stack ) 

: READ-BUFFER 
RE AD_PO INTER 0 

DUP ( 1+ DUP BUFFERJTOP 0 - IF BUFFER_LENGTH 0 - THEN ) WRITE_PO INTER 0 - NOT 
IF 

C0 READ_POINTER 0 1+ ( read data from buffer and advance pointer ) 

DUP BUFFERJTOP 0 - IF BUFFER_LENGTH 0 - THEN READJPOINTER ! ( wrap if buffer end ) 

ELSE 

DROP 0 ( return a zero if buffer is empty ) 

THEN 


: CLEAR-FLAGS 

0 OK_FLAG ! ( initialize flags ) 

0 CRJTLAG ! 

0 QM FLAG ! 


{ INT-RECEIVE is an interrupt driven routine, called after receiving serial data ) 

( It scans the incoming datastream for the occurances of ' OK', ' ?', CRLF. ) 

( The flags QM_FLAG, OKJTLAG and CRJFLAG indicate that the corresponding words were ) 

( detected. As the flags are internally also used for the detecting process, they must ) 

( be checked for a certain value: QM_FLAG - 2 

( OK_FLAG - 3 

( CR — FLAG - 2 are the values, when the string is detected ) 

( Zero values for the flags indicates that the string has not occurred. ) 

( Any other value is not a valid flag. ) 

( Once a flag is set, it will stay set. The checking routine must reset the flags. ) 


CODE INT-RECEIVE 

( by the way: the following three modules are independend and can be 
{ copied for other applications. But dont forget to add the RTS then 

( first we read the value from the interface and put it on the forth data stack 


36 

c. 


{ PUSHA 

★ 

SECURE REGISTERS 

37 

c. 


( PUSHB 



3C 

C, 


( PUSHX 



86 

C, 

00 c. 

( LDAA #0 

* 

FORTH WANTS 16 BIT-> SO CLEAR MSB 

F6 

C, 

SCSR2 , 

( LDAB SCSR2 

★ 

CLEAR INTERRUPT REQUEST 

F6 

C, 

SCDR , 

{ LDAB SCDR 

★ 

GET DATA FROM INTERFACE 

18 

C, 

09 C, 

( DEY 

★ 

PUT DATA ON FORTH DATA STACK 

18 

C, 

09 C, 

( DEY 



18 

C, 

ED C, 00 C, 

( STD 0, Y 




( then we check for all the flags 

( assumes test value on FORTH data stack - BUT it will NOT remove it 


F6 C, QM_FLAG 1+ , ( qmtest ldab qmflag * is QM_FLAG -0 ? 

26 C, 0E C, ( bne qmltest 

18 C, EC C, 00 C, ( ldd 0,y * copy value on data stack but dont remove it 

Cl C, 20 C, ( cmpb #' ' * is it the first testvalue ? 

26 C, 29 C, ( bne oktest * go to next test 



C6 

c. 

01 c. 

( 

Idab 

#1 

F7 

C, 

QM FLAG 1+ r 

( 

stab 

cpnflag 

20 

C, 

22 Cr 

{ 

bra 

oktest 

Cl 

C, 

01 Cr 

( qmltest 

cmpb 

#1 

26 

c. 

IE C, 

( 

bne 

oktest 

18 

C, 

EC Cr 00 C, 

( 

Idd 

o,y 

Cl 

c. 

3F Cr 

( 

cmpb 

#'?* 

26 

c. 

07 C, 

( 

bne 

qmlnext 

C6 

c. 

02 Cr 

( 

Idab 

#2 

F7 

c. 

QM FLAG 1+ , 

( 

stab 

qmf lag 

20 

c. 

10 C, 

( 

bra 

oktest 

Cl 

C, 

20 C, 

( qmlnext 

cmpb 

*' * 

26 

C, 

07 C, 

( 

bne 

qmzero 

C6 

c. 

01 Cr 

( 

Idab 

#1 

F7 

c. 

QM FLAG 1+ , 

( 

stab 

qmf lag 

20 

c. 

05 Cr 

{ 

bra 

oktest 

C6 

c. 

00 Cr 

{ qmzero 

Idab 

#0 

F7 

c. 

QM FLAG 1+ , 

( 

stab 

qmflag 

F6 

c. 

OK FLAG 1+ , 

( oktest 

Idab 

okflag 

26 

c. 

0E C, 

( 

bne 

okltest 

18 

c. 

EC Cr 00 C, 

( 

idd 

o ,y 

Cl 

c. 

4F C, 

( 

cmpb 

#•0' 

26 

c. 

36 C, 

( 

bne 

crtest 

C6 

C, 

01 C, 

{ 

Idab 

#1 

FI 

C, 

OK FLAG 1+ , 

( 

stab 

okflag 

20 

c. 

2F Cr 

{ 

bra 

crtest 

Cl 

c. 

01 Cr 

( okltest 

cmpb 

#1 

26 

c. 

14 Cr 

{ 

bne 

ok2test 

18 

C, 

EC Cr 00 Cr 

( 

Idd 

Ory 

Cl 

c. 

4B Cr 

( 

cmpb 

# *K' 

26 

c. 

07 Cr 

{ 

bne 

ok 1 next 

C6 

C, 

02 C, 

{ 

Idab 

#2 

F7 

c. 

OK FLAG 1+ , 

( 

stab 

okflag 

20 

c. 

ID C, 

( 

bra 

crtest 

Cl 

c. 

4F C, 

( ok 1 next 

cmpb 

#'0* 

26 

c. 

14 Cr 

( 

bne 

okzero 

20 

c. 

17 Cr 

( 

bra 

crtest 

Cl 

C, 

02 C, 

{ ok2test 

cmpb 

#2 

26 

c. 

13 Cr 

( 

bne 

crtest 

18 

C, 

EC C, 00 Cr 

( 

Idd 

o,y 

Cl 

c. 

0D Cr 

( 

cmpb 

#'CR' 

26 

c. 

07 Cr 

{ 

bne 

okzero 

C6 

Cr 

03 Cr 

( 

Idab 

#3 

F7 

c. 

OK FLAG 1+ r 

( 

stab 

okflag 

20 

Cr 

05 Cr 

( 

bra 

crtest 

C6 

C, 

00 Cr 

( okzero 

Idab 

#0 

F7 

Cr 

OK FLAG 1+ r 

( 

stab 

okflag 

F6 

Cr 

CR FLAG 1+ , 

( crtest 

Idab 

crflag 

26 

C, 

0E C, 

( 

bne 

crltest 

18 

Cr 

EC C, 00 C, 

( 

Idd 

o,y 

Cl 

Cr 

0D Cr 

( 

cmpb 

#$0D 

26 

Cr 

IE C, 

( 

bne 

exit 

C6 

Cr 

01 Cr 

( 

Idab 

#1 

F7 

Cr 

CR FLAG 1+ , 

( 

stab 

crflag 

20 

Cr 

17 C f 

( 

bra 

exit 

Cl 

Cr 

01 Cr 

{ crltest 

cmpb 

#1 

26 

Cr 

13 Cr 

{ 

bne 

exit 

18 

c. 

EC C, 00 C, 

( 

Idd 

o,y 

Cl 

Cr 

0A C, 

( 

cmpb 

#$0A 

26 

c. 

07 Cr 

( 

bne 

crzero 

C6 

C, 

02 Cr 

( 

Idab 

#2 

F7 

C, 

CR FLAG 1+ r 

( 

stab 

crflag 

20 

Cr 

05 C, 

{ 

bra 

exit 

C6 

C, 

00 Cr 

( crzero 

Idab 

#0 

F7 

Cr 

CR FLAG 1+ r 

( 

stab 

crflag 

01 

Cr 


( 

nop 



( then we write it into the FIFO 
( assumes data on the FORTH data stack. 


* set QM_FLAG to 1 

* go to next test 

* is QM_FLAG -1 ? 

* copy value on data stack but dont remove it 

* is it the second testvalue ? 

* test for another space {leading spaces?} 

* set QM_FLAG to 2 

* go to next test 


* set QM_FLAG to 1 

* go to next test 

* reset flag 

* is OK_FLAG -0 ? 

* copy value on data stack but dont remove it 

* is it the first testvalue ? 

* go to next test 

* set QM_FLAG to 1 

* go to next test 

* is OK_FLAG -1 ? 

* copy value on data stack but dont remove it 

* is it the second testvalue ? 

* test for another space {leading spaces?} 

* set QM_FLAG to 2 

* go to next test 


* go to next test 

* is 0K_r LAG -2 ? 

* copy value on data stack but dont remove it 
* is it the third testvalue ? 

* go to next test 

* set 0K_FLAG to 3 

* go to next test 

* reset flag 

* is CR_FLAG -0 ? 

* copy value on data stack but dont remove it 

* is it the first testvalue ? 

* go to exit 

* set QM_FLAG to 1 

* go to next test 

* is CR_FLAG -1 ? 

* copy value on data stack but dont remove it 

* is it the first testvalue ? 

* go to exit 

* set CR_FLAG to 2 

* go to next test 

* reset flag 

* jump address for •exit* 


FE C, WRITE_P0 INTER , ( 

FC C, WRI TE_P 0 INTER , ( 

C3 C r 00 C, 01 C, ( 

1A C, B3 C, BUFFER_TOP , ( 

26 C, 03 C, { 

B3 C, BUFFER_LENGTH , ( 

1A C, B3 C, RE AD_PO INTER , 

27 C, 12 C, ( 

36 C, < 

37 C, ( 

18 C, EC C, 00 C, ( 

18 C, 08 C, ( 

18 C, 08 C, { 


Idx 

writepoint 

Idd 

writepoint * 

addd 

#1 * 

cpd 

buffertop 

bne 

label * 

subd 

buflen * 

label cpd readpoint 

beq 

full 

psha 

★ 

pshb 


Idd 

0,y 

iny 


iny 



load write pointer 
inc write pointer 

no correction 
subtract buffer length 
* is read pointer ahead? 

preserve address for later use 

get data from data stack 


E7 C, 

00 c. 

( 

stab 

Of x 

* 

store data {LSB only} 

33 C, 


( 

pulb 




32 C, 


( 

pula 


* 

restore incremented pointer 

FD C, 

WRITE POINTER , 

( 

std 

writepoint 



20 C, 

07 C, 

( 

bra 

exit 



18 C, 

EC C, 00 C, 

{ full 

ldd 

o,y 

* 

take data, but dont use them 

18 C, 

08 C, 

( 

iny 




18 C, 

08 C, 

{ 

iny 




38 C, 


( exit 

pulx 


★ 

restore registers 

33 C, 


( 

pulb 




32 C, 


( 

pula 




3B C, 


( 

rti 




END -CODE 







: KEY-BUF 
BEGIN 

RE AD _P0 INTER @ WRITE_POINTER @ - NOT 
UNTIL 

READ-BUFFER 


CODE-SUB CLEAR-CC-MASKS 

86 C, 00 C, ( LDAA # 0 ) 

06 C, ( TAP ) 

39 C, ( RTS ) 

END-CODE 


INIT-BUFFER 

BUFFER_BOTTOM @ DUP WRITE_POINTER ! READ_POINTER 
BUFFER_TOP @ BUFFER_BOTTOM @ - BUFFER_LENGTH ! 

0 OK_FLAG ! 

0 CR_FLAG ! 

0 QM FLAG ! 


( initialize buffer ) 
( initialize flags ) 


: START-IRQ 

SCI_INT_LINK C@ 7E - NOT 
IF 

7E SCI_INT_LINK EEC! 

THEN ( JMP code ) 

[ ' INT-RECEIVE @ >< FF AND ] LITERAL DUP SCI_INT_LINK 1+ C@ - 
IF 

DROP 

ELSE 

SC I_INT_LINK 1+ EEC! ( hi byte ) 

THEN 

[ 1 INT-RECEIVE @ FF AND ] LITERAL DUP SCI_INT_LINK 2+ C@ - 
IF 

DROP 

ELSE 

SCI_INT_LINK 2+ EEC! ( lo byte ) 

THEN 

CLEAR-CC-MASKS 

INIT-BUFFER ( initialize buffer 

SCCR2 C@ T-5 SCCR2 C! ( enable interrupt ) 


: STOP -IRQ 

SCCR2 C@ F-5 SCCR2 C! ( disable interrupt ) 

; ( links may stay as they are ) 


( ************************** TIMER WORDS ****************************************** ) 
( the following are some generally useful words for timing things.) 

( the 68hcll has an on board counter/timer which runs off the ) 

{ system clock, we can use this timer for timing things like ) 

( exposures, it is a 16 bit counter running at 2 mhz. 

( twait waits a given number of timer ticks ) 

HEX 

CODE-SUB T-WAIT 

18 C, EC C, 00 C, ( LDD 0,Y ) 

18 C, 08 C, ( INY ) 

18 C, 08 C, ( INY ) 

F3 C, B00E , ( ADDD TCNT ) 

1A C, B3 C, B00E , { LOOP CPD TCNT ) 

24 C, FA C, { BCC LOOP ) 

39 C, 

END-CODE 



( M-WAIT expects a number on the stack, it waits that many milli- ) 
{ seconds, the number 1870, which you might expect to be ) 

( 2000, is adjusted downwards to account for the overhead ) 

{ involved in getting in and out of the routine, it was ) 

{ found by experiment, and may need adjustment. ) 

: M-WAIT ( W - ) { WAIT W MILLISECONDS ) 

0 DO 74E T-WAIT LOOP ; 


: MS-WAIT ( D - ) ( WAIT D MILLISECONDS, D IS A DOUBLE ) 

DUP 0- IF DROP ELSE 
0 DO FFFF M-WAIT 1 M-WAIT LOOP THEN 
DUP 0- IF DROP ELSE M-WAIT THEN ; 


{ *************************** EEPROM WORDS ************************ ) 
( The forth dictionary is stored in eeprom memory, but is run out ) 
( of ram. At any time the user may use the following word "store" ) 
( to move the current dictionary to eeprom. This, in and of itself, ) 


{ is not all that useful. The next word, "RESTOR", will move the ) 

( dictionary from eeprom to ram, and restore the state of the ) 
{ forth system to exactly where you were when you issued the store ) 
( command. This is also of limited use, because next time you ) 
( power up the system, RESTOR is not available in ram to to be ) 

( called. Another word, "ASTART!" defined at the end of this file ) 
{ is used to tell the 6811 what word we would like executed on the ) 
( next restart. "RESTOR" can be used as the autostart routine. ) 

( Other words which include restore may also be defined as auto- ) 
( start words, but the routine name is hard coded and this file ) 
( would have to be edited. A detailed discussion of the whole ) 
( autostart process can be found in the New MiCRos manuals. ) 


( eprom represents where in eeprom to start storing the dictionary ) 
( we want to reserve some space for autostart routines etc so we ) 
( start at 256 bytes above the actual start of the eeprom or $1200 ) 

1100 CONSTANT EPROM 
1204 CONSTANT EEDICT-START 
7600 CONSTANT DICT-START 

: EE- ! 2DUP ! BEGIN 2DUP 8 - UNTIL DROP DROP ; 

: EE-C! 2DUP C! BEGIN 2DUP C@ - UNTIL DROP DROP ; 


CODE-SUB 

EEPROT 






CE C, 

55 C, 55 

c. 

( LDX 

#$5555 

- 

1ST EPROM ADDRESS ) 

86 C, 

AA C, 


( LDAA 

#$AA 

- 

1ST DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND AN AA TO $5555 ) 

CE C, 

2A C, AA 

c. 

{ LDX 

#$2AAA 

- 

2ND EPROM ADDRESS ) 

86 C, 

55 C, 


( LDAA 

#$55 

- 

2ND DATA PATTERN ) 

A7 C, 

00 C, 


{ STAA 

0,X 

- 

SEND A 55 TO $2 AAA ) 

CE C, 

55 C, 55 

c. 

( LDX 

#$5555 

- 

3RD EPROM ADDRESS ) 

86 C, 

A0 C, 


( LDAA 

#$A0 

- 

3RD DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND AN A0 TO $5555 ) 

39 C, 



{ RTS 


- 

RETURN ) 

END-CODE 







CODE-SUB 

EEUNPROT 






CE C, 

55 C, 55 

C, 

( LDX 

#$5555 

- 

1ST EPROM ADDRESS ) 

86 C, 

AA C, 


( LDAA 

#$AA 

- 

1ST DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND AN AA TO $5555 ) 

CE C, 

2A C, AA 

C, 

( LDX 

#$2AAA 

- 

2ND EPROM ADDRESS ) 

86 C, 

55 C, 


( LDAA 

#$55 

- 

2ND DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND A 55 TO $2AAA ) 

CE C, 

55 C, 55 

C, 

( LDX 

#$5555 

- 

3RD EPROM ADDRESS ) 

86 C, 

80 C, 


( LDAA 

#$80 

- 

3RD DATA PATTERN ) 

A7 C, 

00 c. 


( STAA 

0,X 

- 

SEND AN 80 TO $5555 ) 

CE C, 

55 C, 55 

C, 

( LDX 

#$5555 

- 

4TH EPROM ADDRESS ) 

86 C, 

AA C, 


( LDAA 

#$AA 

- 

4TH DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND AN AA TO $5555 ) 

CE C, 

2A C, AA 

C, 

( LDX 

#$2AAA 

- 

5TH EPROM ADDRESS ) 

86 C, 

55 C, 


( LDAA 

#$55 

- 

5TH DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND A 55 TO $2 AAA ) 

CE C, 

55 C, 55 

C, 

( LDX 

#$5555 

- 

6TH EPROM ADDRESS ) 

86 C, 

20 C, 


( LDAA 

#$20 

- 

6TH DATA PATTERN ) 

A7 C, 

00 C, 


( STAA 

0,X 

- 

SEND A 20 TO $5555 ) 



39 C, 
END-CODE 


( RTS 


- RETURN ) 


VARIABLE PROMLOC 
VARIABLE PROMCOUNT 

HEX 

: STORE 

0 PROMCOUNT ! 

EEUNPROT 

EPROM 100 + PROMLOC ! 

HERE PROMLOC @ EE- ! 

PROMLOC @2+ PROMLOC ! 

DICT-START PROMLOC @ EE- ! 

PROMLOC @2+ PROMLOC ! 

CR STORING DICTIONARY H CR 
HERE DICT-START DO 

1 C0 DUP PROMLOC @ C@ - IF DROP 

ELSE PROMLOC g EE-C! PROMCOUNT g 1+ PROMCOUNT ! 
THEN 

PROMLOC g 1+ PROMLOC ! 

LOOP 

STORING FORTH USER AREA " CR 
84 6 DO 

I Cg PROMLOC g EE-C! 

PROMLOC g 1+ PROMLOC ! 

LOOP 

EEPROT 

CR STORE COMPLETE " CR 
. " dictionary length: " HERE 7600 - U. CR 
. " bytes updated: " PROMCOUNT 0 U. CR 

EEPROT ; 


RESTOR 
( CR . 
1204 
7600 
1200 0 

CMOVE 


" RESTORING THE DICTIONARY " CR ) 

( start of dictionary in EEPROM ) 

( start of dictionary in RAM ) 

1202 @ ( fetch dictionary end and start ) 

( compute length ) 

{ move it to RAM ) 


( 

1200 

1202 

1204 

6 84 


RESTORING 

0 

0 

+ 

CMOVE 


FORTH USER AREA " CR ) 

{ fetch dictionary end address ) 

( fetch dictionary start address ) 

{ compute length ) 

( add eeprom dictionary offset ) 

( which points us to the eeprom user area ) 
( move it into ram ) 


( CR RESTORE STATE COMPLETE " CR ) 


( ***★*****★***★****★★***★*★*★★★****★★*★★ MAILBOX WORDS 
( DEFINITIONS OF PT-VSI MAILBOXES ) 

HEX 

D200 CONSTANT MB0 
D201 CONSTANT MB1 
D202 CONSTANT MB2 
D203 CONSTANT MB3 
D204 CONSTANT MB4 
D205 CONSTANT MBS 
D206 CONSTANT MB 6 
D207 CONSTANT MB7 
D208 CONSTANT MB8 
D209 CONSTANT MB 9 
D20A CONSTANT MB10 
D20B CONSTANT MB11 
D20C CONSTANT MB12 
D20D CONSTANT MB13 
D20E CONSTANT MB14 
D20F CONSTANT MB15 


*****★**★*★★*★**★★★★*★★* ****** 



D218 CONSTANT MB24 
D219 CONSTANT MB25 
D21A CONSTANT MB26 
D21D CONSTANT MB29 

CODE-SUB MB0 


OF 

C, 





( SEI 


- 

do not disturb {disable int.} ) 

CE 

c. 

BOOA , 



( LDX 

PORTE 

- 

PUT ADDRESS OF PORT E INTO X ) 

A6 

c. 

00 

c. 



( LDAA 

0,X 

- 

READ PORT E ) 

84 

c. 

80 

c. 



( ANDA 

#$80 

- 

MASK OUT ALL BUT BIT 7 ) 

26 

c. 

FA C, 



{ BNE 

#$FA 

- 

IF NOT 0 GO BACK TO LDAA ) 

18 

c. 

EC 

c. 

00 

c. 

{ LDD 

0, Y 

- 

GET ADDRESS OF MAILBOX ) 

18 

c. 

08 

c. 



( INY 


- 

VALUE ON THE STACK IS 16 BITS ) 

18 

c. 

08 

c. 



( INY 


- 

SO INCREMENT THE SP TWICE ) 

8F 

c. 





( XGDX 


- 

PUT ADDRESS INTO INDEX REG X ) 

3C 

c. 





{ PSHX 


- 

SAVE ADDRESS FOR FUTURE USE ) 

A6 

C, 

00 

c. 



( LDAA 

o,x 

- 

READ MAILBOX, IGNORE THE VALUE ) 

CE 

C, 

BOOA , 



( LDX 

PORTE 

- 

GET ADDRESS OF PORT E AGAIN ) 

A6 

c. 

00 

c. 



( LDAA 

o,x 

- 

READ PORT E ) 

84 

c. 

80 

c. 



( ANDA 

#$80 

- 

MASK OUT ALL BUT BIT 7 ) 

27 

c. 

FA 

c. 



{ BEQ 

#$FA 

- 

IF NOT 1 GO BACK TO LDAA ) 

38 

c , 





{ PULX 


- 

GET THE MAILBOX ADDRESS AGAIN ) 

A6 

c. 

00 

c. 



( LDAA 

o,x 

- 

READ THE MAILBOX AGAIN ) 

16 

c. 





{ TAB 


- 

TRANSFER A TO B TO ORIENT FOR STACK 

4F 

c. 





{ CLRA 


- 

CLEAR ACCUMULATOR A) 

18 

c. 

09 

c. 



( DEY 


- 

VALUE TO BE PUT ON THE STACK IS 16 ! 

18 

c. 

09 

c. 



( DEY 


- 

BITS SO DECREMENT THE SP TWICE ) 

18 

c. 

ED 

c. 

00 

c. 

{ STD 

0,Y 

- 

STORE THE DATA ON THE STACK ) 

OE 

c. 





( CLI 


- 

interrupts enabled 

39 

C, 





( RTS 


- 

RETURN ) 

END-CODE 









CODE-SUB MB! 








OF 

c. 





( SEI 


- 

do not disturb {disable int.} ) 

CE 

c. 

BOOA , 



{ LDX 

PORTE 

- 

PUT ADDRESS OF PORT E INTO X ) 

A6 

c. 

00 

c. 



( LDAA 

o,x 

- 

READ PORT E ) 

84 

c. 

80 

c. 



{ ANDA 

#$80 

- 

MASK OUT ALL BUT BIT 7 ) 

26 

c. 

FA 

c. 



( BNE 

#$FA 

- 

IF NOT 0 GO BACK TO LDAA ) 

18 

c. 

EC 

c. 

00 

c. 

( LDD 

Or Y 

- 

GET ADDRESS OF THE MAILBOX ) 

18 

c. 

08 

c. 



( INY 


- 

VALUE ON THE STACK IS 16 BITS ) 

18 

C, 

08 

c , 



{ INY 


- 

SO INCREMENT THE SP TWICE ) 

8F 

c. 





( XGDX 


- 

PUT THE ADDRESS INTO INDEX REG X ) 

18 

c. 

EC 

c. 

00 

c. 

( LDD 

OrY 

- 

GET DATA TO PUT INTO THE MAILBOX ) 

18 

c. 

08 

c. 



( INY 


- 

VALUE ON THE STACK IS 16 BITS ) 

18 

c. 

08 

C, 



{ INY 


- 

SO INCREMENT THE SP TWICE ) 

E7 

c. 

00 

c. 



( STAB 

o,x 

- 

WRITE DATA TO THE MAILBOX ) 

OE 

c. 





( CLI 


- 

interrupts enabled 

39 

c. 





( RTS 


- 

RETURN ) 


END-CODE 


^ ******★*★★★★*•■*★★*★**★**★** status LEDs ************************* ) 
( LIGHT THE LED'S ONE AT A TIME INDICATING LIFE ) 

D700 CONSTANT LIGHTS 
20 CONSTANT MAXCOUNT 
80 CONSTANT MAXVAL 

VARIABLE LCOUNT 
VARIABLE LIGHTVAL 


: INITLEDS 

0 LIGHTS C! 

0 LCOUNT ! 

1 LIGHTVAL C! ; 


: HEARTBEAT 

LIGHTVAL C@ 

DUP LIGHTS C! 

LCOUNT @ DUP MAXCOUNT - 
IF DROP 0 LCOUNT ! 

DUP MAXVAL - 
IF DROP 1 LIGHTVAL C! 
ELSE 2 * LIGHTVAL C! 
THEN 

ELSE 1+ LCOUNT ! DROP 
THEN ; 


{ **★**★****★**★****★*★★*★ vMEbus Interface and PTVSI CHIP ************************** ) 


( Setting the address of the ATDVME interface 

( 

( Definitions of the switches are as follows : 
( 

( 

( 123456789 10 11 12 

( 

( MSB LSB l I I 

( ADDRESS ] | | 

( III 


first two digits in address of DRAM 


DRAM ARRAY SIZE 


ADDRESS SPACE 


NO-START OPTION 


size of DRAM 00 - 4M, 

10 - 16M, 

"off" - 24 bit, "on" - 

"off" - do not start 


( 

( 

( Switches 1 through 8 are used for the first two digits 
{ in the address of the VME board. This address represents 
( the address of the first location in the DRAM interface. 

( The controller portion of the board is accessed immediatly 


{ above the DRAM array. 

( 

{ Switches 9 and 10 determine how much memory space the 
{ board will occupy. Presumably this is how much RAM actually 
( exists on the board, but that is not necessary. 

( 

( Switch 11 which address space the board will respond 
( to and hence which digits in the 32 bit address are set 
( according to the switches. 

( 

{ Switch 12 is used as a "go / no^go" option. If the 
( board is reset with this bit set "off" , the on-board 
( microcontroller will initialize the bus interface, but will 
( not run the camera control loop. It will instead look to the 
( serial interface for FORTH commands. 

( 


01 - 8M 
11 - 32M 

32 bit 


HEX 

{ many of the registers in the bus uinterface chip are initialized the 
( same no matter what configuration. 


: INIT-PTVSI 

0 MB0 MB! 

0 MB3 MB! 

0 MB6 MB! 

0 MB9 MB! 

0 MB12 MB! 

0 MB15 MB! 

0 D212 MB! 

0 D215 MB! 

5 D21B MB! ; 


MB1 MB! 

0 

MB2 MB! 

MB4 MB! 

0 

MBS MB! 

MB7 MB! 

0 

MB8 MB! 

MB10 MB! 

0 

MB11 MB! 

MB13 MB! 

0 

MB14 MB! 

D210 MB! 

0 

D211 MB! 

D213 MB! 

0 

D214 MB! 

D216 MB! 

34 

D217 MB! 


( The bits on the DIPSWITCH and on PORTE are inverted, so we 
( always end up either inverting them or using them in a way that 
( may seem backwards. Keep that in mind. 

D600 CONSTANT DIPSWITCH 
BOO A CONSTANT PORTE 


( Temporary storage locations for what will ultimately be written 
( into registers 25 and 29 of the PT-VSI bus interface chip. 

{ Temporary storage required because we cannot read back from 
( the PT-VSI and we may need to set bits in these registers 
( as we initialize the bus interface. 

VARIABLE T25 
VARIABLE T29 


( report impossible addressing combination to the user 
: ADDR-ERROR 



BEGIN 

00 LIGHTS C! 
400 M-WAIT 
FF LIGHTS C! 
400 M-WAIT 
FALSE 
UNTIL ; 


( forever . . . 

( turn lights on 

( wait 1 second 

( turn lights off 

( wait 1 second 

( leave false 
{ go do it again 


( setup bus interface for 24 bit address space 


: SETUP-24 

FF MB24 MB! 

DIPSWITCH C@ FF XOR { 

DUP 4 / DUP T25 C! T29 C! { 
T29 C0 F0 AND T29 C! ( 

40 * MB26 MB! ( 


fetch address bits and invert them 
right shift by two store temp values 
zero bottom four bits of T29 
left shift addr by 6 and store in reg 26 


PORTE C@ FF XOR 
0C AND 
DUP 0 - IF 

T25 C@ T-4 T25 C! 

THEN 

DUP 4 - IF 

T25 C@ T-5 T25 C! 

T29 C@ 0 OR T29 C! 
THEN 

DUP 8 - IF 

ADDR-ERROR 
THEN 
C - IF 

ADDR-ERROR 

THEN 


( fetch control bits and invert them 
( mask off memory size bits 
{ if 4 meg . . . 

( ... set bit 4 in T25 

( if 8 meg . . . 

( ... set bit 5 in T25 
( ... set bit 1 in T29 

( if 16 meg . . . 

( ... that ' s a fatal error in 24 bit space 

{ if 32 meg . . 

( ... that's also fatal. 


T25 C@ MB25 MB! ( store the temp values to mailboxes 25, 29 

T29 C@ MB29 MB! 


90 D21F MB! 


( call it 24 bit mode and enable DRAM 


( setup bus interface for 32 bit address space 
: SETUP-32 


DIPSWITCH C@ FF XOR 



( fetch address bits and invert them 

DOP 4 / 

MB24 MB! 



{ right shift by two and store 

40 * DUP T25 C! T29 C 

; i 


( left shift by 6 and store temp values 

T29 C@ 

F0 AND T29 C! 



( zero bottom four bits of T29 

0 MB26 

MB! 



( zero MB26 

PORTE C@ FF XOR 



( fetch control bits and invert them 

0C AND 




( mask off memory size bits 

DUP 0 - 

■ IF 



( if 4 Meg ... 


T25 C@ T-4 

T25 

C! 

( ... set bit 4 in T25 


THEN 




DUP 4 - 

■ IF 



{ if 8 Meg ... 


T25 C@ T-5 

T25 

C! 

{ ... set bit 5 in T25 


T29 C3 01 OR 

T29 

C! 

( ... set bit 0 in T29 


THEN 




DUP 8 - 

• IF 



( if 16 Meg ... 


T25 C@ T-6 

T25 

C! 

( ... set bit6 in T25 


T29 C8 03 OR 

T29 

C! 

( ... set bits 0 and 1 in T29 


THEN 




C - 

- IF 



( if 32 Meg .. 


T25 C@ T-7 

T25 

C! 

( ... set bit 7 in T25 


T29 C@ 07 OR 

T29 

C! 

( ... set bits 0,1,2 in T29 


THEN 




T25 C@ 

MB25 MB! 



{ store the temp values to mailboxes 25, 

T29 C@ 

MB29 MB! 




80 D21F MB! ; 



{ call it 32 bit mode and enable DRAM 


( GO_FOR_IT will be checked later to 
( determine if we should enter command loop 

VARIABLE GO_FOR_IT 

: SETUP 

INIT-PTVSI 
PORTE Cg 01 AND 

IF FALSE GO FOR IT ! (if PORTE bit 0 - "off" then we will not start 


'on M then we will 


ELSE TRUE GO_FOR_IT ! 
THEN 

PORTE C@ 02 AND 

IF SETUP-24 
ELSE SETUP-32 
THEN 

CO D21E MB! ; 


( if PORTE bit 0 - " 

{ check address space bit 

{ if PORTE bit 1 - "off" then 24 bit space 
( if PORTE bit 1 - "on” then 32 bit space 

( enable dram array select pin 


( *******★*★★**★★★★*★****★★*★•*★* COMMUNICATION ******************************************* ) 
( the general command process for this card is as follows: 

{ all commands are prefixed with their parameters. 

{ the 6811 waits for data or commands by polling MBO 

( MBO is used as the command status register for master slave communication 


( 

( bit definitions : 

( 76543210 

{ | | | U I I + CRDY command ready 

( II I I I 1+ MSDF master slave data flag 

( III II + BSY busy 


( III 1+ 

( III + 

( I I + 

( | + 

( + 

( 

( 

{ MB1 and MB2 are the MSDR master/ slave data register 
{ Date may be of two types. Either parameter data to be placed on 
( the stack for later use by a command. Or command number data, a number 

( representing a command the master wishes executed. 

( Both types of data is assumed to be 16 bit with the upper portion 
( in MB2 and the lower portion in MB1 . 

( 

( 

( MB3 contains the count of characters recieved from the camera 
( available for the host. 

( the count is updated after every transfer 

( 

( 

( MB4 is used for the text transfer from the VME board to the host 

{ 

{ 

( MBS is used as the ERROR STATUS REGISTER. 

( the local slave sets bits in this register 

( when it recognizes errors 

( 

( errors returned include : 

( 76543210 

( I I I I I I I + CMD-ERR : command number out of range 

< I I I II 1+ STACK-ERR : stack underflow condition 

( I j j j |+ LOST-DATA : buffer overflow during text transfer to host 

( !!! +■ 

( j 1 + 


( + QM-ERR : error flag caused by a question mark 

( 

( Please note : It is requested that the host cpu not write to the 

{ error status register. A command is provided for 

( resetting the register to 0. If that command fails 

( the board is not functioning properly and as a last 

( reseort a software reset is recommended. 

( 

( 


( MB6 is used as the status word for slave master communication. 

( The master sets the SMDR flag to indicate it is ready to accept data from slave. 

{ The slave provides a character in MB4 and the count of available characters in MB3. 

{ It then resets the SMDR. 

( 

( 76543210 

{ I I I I I I I + SMDR : slave master data request 

( I I I I I I + 

( I I I I I + 

( II I 1+ 

{ III + 

( I I + 



( 

( 


! +* 
+— 


{ BSY sets the busy flag in MBO ) 
: BSY 4 MBO MB! ; 

( RDY clears MBO ) 

: RDY 0 MBO MB! ; 


( MSDF? checks the MSDF flag in MBO to see if data has been placed in MB1 ) 

: MSDF? MBO MB@ 2 - ; 

( CRDY? checks the CRDY flag in MBO to see if a command is ready to be executed ) 
: CRDY? MBO MB@ 1 - ; 

{ SMDR? is issued by the host when it is ready to accept text ) 

: SMDR? MB6 MB@ 1 AND 1 - ; 

( SMRDY is the ready flag for the slave to master transfer 
: SMRDY 0 MB6 MB! ; 


{ * COMMANDS TO SET THE ERROR STATUS REGISTER BITS ) 


( CMD-ERR 
( 

( 

HEX 

: CMD-ERR 


sets the command range error flag 

indicating that the VME board thinks that the 

command number passed with the last CRDY flag was invalid 

MBS MB0 01 OR MB 5 MB! ; 


( STACK-ERR sets the stack underflow condition flag 

( indicating that the VME board has noticed that it does not 

( have adequate data on the stack to perform a requested 

( operation. NOTE : the VME board does not attempt to 

{ execute the command, and leaves the stack untouched. 

HEX 

: STACK-ERR MBS MB@ 02 OR MB5 MB! ; 


{ QM-ERR 
( 

( 

HEX 

: QM-ERR 


sets the question mark error flag 

indicating that the camera has returned a question mark and 
does not recognize a command that has been issued ) 

MB5 MB@ 80 OR MBS MB! ; 


{ LOST-DATA 
( 

( 

HEX 

: LOST-DATA 


sets a flag indicating that an overflow occurred during text transfer 
from slave to host. If this flag is set, the host was not fast enough 
to get all data from slave 

MB 5 MB8 40 OR MB5 MB! ; 


( BUFFER-COUNT gets the number of characters stored in the buffer ) 
{ Leaves count value on stack ) 

: BUFFER-COUNT 

WRITE_POINTER 8 READ_PO INTER 8 - 
DUP 0< IF BUFFER_LENGTH 8 + THEN 
DUP BUFFER LENGTH @ 1 - - IF LOST-DATA THEN 


( SERVE-HOST checks if host is ready to accept data. If it is ready, the data are 
( transferred via MB4 and the count of the remaining data is stored in MB3 


: SERVE-HOST 
SMDR? 

IF 

BUFFER-COUNT 
DUP 0- NOT 
IF 

READ-BUFFER MB4 MB! 
1 - 
THEN 
MB3 MB! 

SMRDY 

ELSE 


( check if host is ready for data 
( if data are available in buffer 

( store data in mailbox 
( decrement BUFFER-COUNT 

( store count in mailbox 
( issue the ready flag 



BUFFER-COUNT 

MB3 MB! ( store count in mailbox 

THEN ; 


WAIT-MSDF 

BEGIN 

SERVE-HOST 

MSDF? 

UNTIL ; 


^ **************************** COMMAND EXECUTION ************************************** ) 
( DOCMD execute the command corresponding to the number ) 

( retrieved from the host in the mailbox ) 


CODE-SUB DOCMD 


18 

C, 

EC C, 00 

C, ( LDD 

0,Y 

18 

c. 

08 C, 

( INY 


18 

c. 

08 C, 

( INY 


05 

c. 


( LSLD 


C3 

c. 

7000 , 

( ADDD 

CTAB 

8F 

C, 


{ XGDX 


EC 

c. 

00 C, 

( LDD 

0,X 

BD 

c. 

AT04 , 

( JSR 

AT04 

39 

c. 


( RTS 


END-CODE 





get the command number ) 

the value on the stack is 16 bits ) 

so inCRement the sp twice ) 

multiply the number by two ) 

add the command table start address ) 

put the address into the index reg ) 

load the cfa into the d accumulator ) 

jump to the command table routine ) 

return ) 


HEX 

{ WAIT -CR-LF WAITS UNTIL A CARRIAGE RETURN LINEFEED PAIR HAS BEEN RECEIVED ) 


: WAIT -CR-LF 
BEGIN 

CRJTLAG @ 2 - DUP IF 0 CR_FLAG ! THEN 
UNTIL 



( 


HEX 

WAIT -OK ( wait until an " 'ok' cr If " has been received ) 

BEGIN 

OKJPLAG 0 3 - DUP IF 0 OK_FLAG ! THEN ( check if OK occurred 
QM_FLAG @ 2 - OR (or the QM flag was set 

SERVE-HOST 
UNTIL 

WAIT-CR-LF 


( ************************** commands ****************************** ) 


( ****** functions called by the host to operate this board ************* ) 

( AG-INIT initialize the "address generator" PLD which controls 
( the DMA writes of camera data into the dual ported buffer 

( Calling this function performs no useful function other 

( than assuring that the next image data will begin at address 0 

HEX 

D400 CONSTANT AG1 
D401 CONSTANT AG2 

: AG-INIT 0 AG2 C! 3 AG2 C! ; 


( SPCON-RESET resets the '• serial to parallel converter pld 
( which identifies the bursts of pixel clocks on the AIS style 
( interface cards, performs no useful function whatsoever on 
{ the ATDVME1 parallel data interface cards 


HEX 

D500 CONSTANT SPCON 
D800 CONSTANT ISPCON 


j 

i 


! 



: S PC ON-RE SET FF ISPCON C! ; 

: SPCON-INIT BSY SPCON C! RDY ; 


( I/O Port routines : 

( The board contains a parallel I/O port accessible to the host 
{ through a set of commands. 

{ The 6811 's built in I/O port PORT A is used 
HEX 

BO 00 CONSTANT PORTA 

( IO-READ read the 3 input pins on the user io port, bits 0-2 ) 
: IO-READ 

PORTA C@ 07 AND MB2 MB! 

WAIT-OK 


( I 0- WRITE write the 4 output pins of the user io port, bits 3-7 ) 

{ expects the value to be on the stack 

: IO -WRITE 

DEPTH 1 < 

IF STACK-ERR 

ELSE 78 AND PORTA C! WAIT-OK 
THEN ; 


( I O-PULSE pulse pin 1 of the user io port for x milliseconds ) 

( expects the number of milliseconds to be on the stack ) 

: IO -PULSE 

DEPTH 1 < 

IF STACK— ERR 

ELSE 08 PORTA C! M-WAIT 00 PORTA C! WAIT-OK 
THEN ; 


( CAM-HALT 
( 

( 

: CAM-HALT 


stops the command loop 

it is only a dummy word as the code is detected before we get here 
the dummy word is needed to have an entry in the CMD table 


( ERROR-RESET resets the error flags 
: ERROR-RESET 0 MBS MB! ; 

: FLUSH-BUFFER ( empties the buffer ) 

STOP-IRQ 

MB5 MB@ F-6 MB5 MB! ( reset any old LOST-DATA bit ) 

START-IRQ ; 


: NOT-DEFINED CMD-ERR ; 


( *★**★* functions called by the host to operate the camera ************* ) 
HEX 

: CAM-RESTART 

CXX " 0D EMIT 
FFF M-WAIT 
FLUSH-BUFFER 

CIN " 0D EMIT 
WAIT-OK 


: SET-PARAM ( set the value of a camera control parameter ) 
DEPTH 2 < 

IF STACK-ERR 
ELSE 

U. U. FP! H 0D EMIT 
WAIT-OK 
THEN ; 


: CISC -ON ( begin continuous clear option ) 

SCT" 0D EMIT 
WAIT-OK 


: CISC-OFF 


{ terminate continuous clear option ) 


SCF" OD EMIT 
WAIT-OK 


GAIN-LO ( set camera gain to low ) 

SGL" OD EMIT 
WAIT-OK 


GAIN-HI ( set camera gain to high > 

. " SGH" OD EMIT 
WAIT-OK 


OFFSET! ( write value to CCD signal offset DAC ) 

DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. SCO" OD EMIT 
WAIT-OK 
THEN ; 


SHADE ( produce test pattern ) 

IAS” OD EMIT 
WAIT-OK 


OSHUT ( open the shutter ) 
SSO" OD EMIT 
WAIT-OK 


CSHUT ( close the shutter ) 
SSC" OD EMIT 
WAIT-OK 


PIX-BIN { shift N pixels into the summing well or output ) 

DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. LPB" OD EMIT 
WAIT-OK 
THEN ; 


ROW-BIN ( shift N rows into the serial register ) 

DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. LRB" OD EMIT 
WAIT-OK 
THEN ; 


PIX-DISCARD { discard N pixels off the CCD ) 
DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. LPC" OD EMIT 
WAIT-OK 
THEN ; 


ROW-DISCARD ( discard N rows off the CCD ) 
DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. LRC" OD EMIT 
WAIT-OK 
THEN ; 


PIX-READ { read N pixels off the CCD ) 
DEPTH 1 < 

IF STACK-ERR 



ELSE 


U. LPR" OD EMIT 
WAIT-OK 
THEN ; 


: ROW-READ ( read N rows off the CCD ) 
DEPTH 1 < 

IF STACK-ERR 
ELSE 

0. LRR" OD EMIT 
WAIT-OK 
THEN ; 


: CAM-WRITE 

DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. U. . H LCW" OD EMIT 
WAIT-OK 
THEN ; 


: CLEAR { clear the ccd ) 
ICL" OD EMIT 
WAIT-OK 


: READ ( read out the ccd ) 

IRD" OD EMIT 
WAIT-OK 


: BIAS ( close, clear, read ) 

IAB” OD EMIT 
WAIT-OK 


: XPOSE ( close, clear, integrate ) 

IIL" OD EMIT 
WAIT-OK 


: DARK { CLOSE, CLEAR, INTEGRATE, READ ) 

I AD" OD EMIT 
WAIT-OK 


: OBS 


{ CLOSE, CLEAR, OPEN, INTEGRATE, CLOSE, READ ) 
IAL" OD EMIT 
WAIT-OK 


: TEMPOS 


STB" 

WAIT-OK 


( produce formatted string reporting temperature of CCD ) 
OD EMIT 


: TEMP10 


STC" 

WAIT-OK 


{ produce formatted string reporting temperature of CASE ) 
OD EMIT 


: FORMAT? 


FF?" 

WAIT-OK 


( produce 
OD EMIT 


formatted table of camera parameters ) 


SET-FORMAT 

FSF" 

WAIT-OK 


( initialize camera with current format parameters ) 
OD EMIT 


( ANTI-BLOOM these are to be replaced by a parameter ) 

: ANTI-BLOOM-OFF 

SBF" OD EMIT 
WAIT-OK 


: ANTI-BLOOM-ON 


SBT" OD EMIT 
WAIT-OK 


: INTEGRATE -CCD ( stop clearing, integrate charge on the CCD ) 

I ID" OD EMIT 
WAIT-OK 


: CAM-FAST ( set camera speed to fast ) 
SSF" OD EMIT 
WAIT-OK 


: CAM-SLOW ( set camera speed to slow ) 
SSS" OD EMIT 
WAIT-OK 


: FRAME-TRANSFER 

SFT" OD EMIT 
WAIT-OK 


: FULL-FRAME 

SFF" OD EMIT 
WAIT-OK 


: SET-TEMP 

DEPTH 1 < 

IF STACK-ERR 
ELSE 

U. . " ST! " OD EMIT 
WAIT-OK 
THEN ; 


VARIABLE TEMP_POINTER 

: SEND-STRING ( get a character from the vme master and send to the camera ) 
DEPTH 1 < 

IF STACK-ERR 
ELSE 

WRI TE__PO INTER @ TEMP_PO INTER ! ( store old pointer ) 

EMIT 

BEGIN 

WRITE_POINTER @ TEMP_POINTER @ - NOT ( wait until pointer advances ) 
UNTIL 

THEN ; 


( BUILD BUILD A JUMP TABLE OF COMMANDS IN RAM ) 

7000 CONSTANT CTAB 

: BUILD 

( functions related to initialization and operation of this board ) 


[ 

AG-INIT ] 

LITERAL 

CFA 

CTAB 

i 


( COMMAND 

OFFSET 

0X00 

) 

[ 

SPCON-INIT ] 

LITERAL 

CFA 

CTAB 

2 

+ ! 

{ COMMAND 

OFFSET 

0X01 

) 

[ 

SPCON-RESET ] 

LITERAL 

CFA 

CTAB 

4 

+ ! 

{ COMMAND 

OFFSET 

0X02 

) 

[ 

IO-READ ] 

LITERAL 

CFA 

CTAB 

6 

+ ! 

( COMMAND 

OFFSET 

0x03 

) 

[ 

IO-WRITE ] 

LITERAL 

CFA 

CTAB 

8 

+ l 

( COMMAND 

OFFSET 

0x04 

) 

[ 

IO-PULSE ] 

LITERAL 

CFA 

CTAB 

A 

+ ! 

( COMMAND 

OFFSET 

0x05 

) 

[ 

1 CAM-HALT ] 

LITERAL 

CFA 

CTAB 

C 

+ ! 

{ COMMAND 

OFFSET 

0X0 6 

) 

[ 

1 ERROR-RESET ] 

LITERAL 

CFA 

CTAB 

E 

+ ! 

( COMMAND 

OFFSET 

0X07 

) 

[ 

1 FLUSH-BUFFER ] 

LITERAL 

CFA 

CTAB 

10 

+ ! 

( COMMAND 

OFFSET 

0X08 

) 

[ 

' NOT-DEFINED ] 

LITERAL 

CFA 

CTAB 

12 

+ ! 

( COMMAND 

not defined 

) 

[ 

1 NOT-DEFINED ] 

LITERAL 

CFA 

CTAB 

14 

+ ! 

( COMMAND 

not defined 

) 

[ 

' NOT-DEFINED ] 

LITERAL 

CFA 

CTAB 

16 

+ ! 

( COMMAND 

not defined 

) 

[ 

1 NOT-DEFINED ] 

LITERAL 

CFA 

CTAB 

18 

+ ! 

( COMMAND 

not defined 

) 



[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

1A 

+ ! 

( COMMAND 

not defined ) 

[ 

• NOT“DEFINED 

] 

LITERAL 

CFA 

CTAB 

1C 

+ ! 

( COMMAND 

not defined ) 

[ 

’ NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

IE 

+ ! 

( COMMAND 

not defined ) 

[ 

1 NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

20 

+ ! 

( COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

22 

+ ! 

( COMMAND 

not defined ) 

r 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

24 

+ ! 

( COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

26 

+ ! 

( COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

28 

+ ! 

( COMMAND 

not defined ) 


' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

2A 

+ ! 

{ COMMAND 

not defined ) 

L 

' NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

2C 

+ ! 

< COMMAND 

not defined ) 

[ 

1 NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

2E 

+ ! 

( COMMAND 

not defined ) 

[ 

* NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

30 

+ ! 

( COMMAND 

not defined ) 

[ 

• NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

32 

+ ! 

( COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

34 

+ ! 

( COMMAND 

not defined ) 

[ 

* NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

36 

+ ! 

( COMMAND 

not defined ) 

[ 

• NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

38 

+ ! 

{ COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

3A 

+ ! 

( COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

3C 

+ ! 

{ COMMAND 

not defined ) 

[ 

' NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

3E 

+ ! 

{ COMMAND 

not defined ) 

( 

functions related 

to camera operation ) 





[ 

1 CAM-RESTART 

] 

LITERAL 

CFA 

CTAB 

40 

+ ! 

( COMMAND 

OFFSET 

0x20 ) 

[ 

' SET-PARAM ] 


LITERAL 

CFA 

CTAB 

42 

+ ! 

( COMMAND 

OFFSET 

0x21 ) 

[ 

• CISC-ON ] 


LITERAL 

CFA 

CTAB 

44 

+ ! 

( COMMAND 

OFFSET 

0x22 ) 

[ 

' CISC-OFF ] 


LITERAL 

CFA 

CTAB 

46 

+ ! 

{ COMMAND 

OFFSET 

0x23 ) 

[ 

• GAIN-HI ] 


LITERAL 

CFA 

CTAB 

48 

+ ! 

{ COMMAND 

OFFSET 

0x24 ) 

[ 

’ GAIN-LO ] 


LITERAL 

CFA 

CTAB 

4A 

+ ! 

{ COMMAND 

OFFSET 

0x25 ) 

[ 

1 OFFSET! ] 


LITERAL 

CFA 

CTAB 

4C 

+ ! 

< COMMAND 

OFFSET 

0X26 ) 

[ 

• SHADE ] 


LITERAL 

CFA 

CTAB 

4E 

+ ! 

( COMMAND 

OFFSET 

0x27 ) 

[ 

' OSHUT ] 


LITERAL 

CFA 

CTAB 

50 

+ ! 

( COMMAND 

OFFSET 

0x28 ) 

[ 

' CSHUT ] 


LITERAL 

CFA 

CTAB 

52 

+ ! 

( COMMAND 

OFFSET 

0x29 ) 

[ 

• PIX-BIN ] 


LITERAL 

CFA 

CTAB 

54 

+ ! 

( COMMAND 

OFFSET 

0x2A ) 

[ 

' ROW-BIN ] 


LITERAL 

CFA 

CTAB 

56 

+ ! 

( COMMAND 

OFFSET 

0x2B ) 

[ 

' PIX-DISCARD 

3 

LITERAL 

CFA 

CTAB 

58 

+ ! 

{ COMMAND 

OFFSET 

0x2C ) 

[ 

• ROW-DISCARD 

3 

LITERAL 

CFA 

CTAB 

5A 

+ ! 

{ COMMAND 

OFFSET 

0x2D ) 

[ 

' PIX-READ ] 


LITERAL 

CFA 

CTAB 

5C 

+ ! 

( COMMAND 

OFFSET 

0x2E ) 

[ 

* ROW-READ ] 


LITERAL 

CFA 

CTAB 

5E 

+ ! 

( COMMAND 

OFFSET 

0x2F ) 

[ 

' CAM-WRITE ] 


LITERAL 

CFA 

CTAB 

60 

+ ! 

( COMMAND 

OFFSET 

0x30 ) 

( 

' CLEAR ] 


LITERAL 

CFA 

CTAB 

62 

+ ! 

( COMMAND 

OFFSET 

0x31 ) 

[ 

• READ ] 


LITERAL 

CFA 

CTAB 

64 

+ ! 

( COMMAND 

OFFSET 

0x32 ) 

[ 

' BIAS ] 


LITERAL 

CFA 

CTAB 

66 

+ ! 

( COMMAND 

OFFSET 

0x33 ) 

[ 

1 XPOSE ] 


LITERAL 

CFA 

CTAB 

68 

+ ! 

( COMMAND 

OFFSET 

0x34 ) 

[ 

• DARK ] 


LITERAL 

CFA 

CTAB 

6A 

+ ! 

{ COMMAND 

OFFSET 

0x35 ) 

[ 

' OBS ] 


LITERAL 

CFA 

CTAB 

6C 

+ ! 

( COMMAND 

OFFSET 

0x36 ) 

[ 

' SEND-STRING 

3 

LITERAL 

CFA 

CTAB 

6E 

+ ! 

( COMMAND 

OFFSET 

0X37 ) 

[ 

' TEMPO 0 ] 


LITERAL 

CFA 

CTAB 

70 

+ ! 

( COMMAND 

OFFSET 

0X38 ) 

{ 

« TEMP 1@ ] 


LITERAL 

CFA 

CTAB 

72 

+ ! 

( COMMAND 

OFFSET 

0X39 ) 

[ 

* FORMAT? ] 


LITERAL 

CFA 

CTAB 

74 

+ ! 

( COMMAND 

OFFSET 

0X3A ) 

[ 

' SET-FORMAT 1 


LITERAL 

CFA 

CTAB 

76 

+ ! 

( COMMAND 

OFFSET 

0X3B ) 

[ 

■ ANTI-BLOOM-OFF 

] LITERAL 

CFA 

CTAB 

78 

+ ! 

( COMMAND 

OFFSET 

0X3C ) 

[ 

' ANTI-BLOOM-ON ] 

LITERAL 

CFA 

CTAB 

7A 

+ ! 

{ COMMAND 

OFFSET 

0X3D ) 

[ 

' INTEGRATE -CCD ] 

LITERAL 

CFA 

CTAB 

1C 

+ ! 

( COMMAND 

OFFSET 

0X3E ) 

[ 

1 CAM-FAST ] 


LITERAL 

CFA 

CTAB 

7E 

+ ! 

( COMMAND 

OFFSET 

0X3F ) 

[ 

1 CAM-SLOW ] 


LITERAL 

CFA 

CTAB 

80 

+ ! 

( COMMAND 

OFFSET 

0X40 ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

82 

+ ! 

( COMMAND 

OFFSET 

0X41 ) 

[ 

' NOT-DEFINED 

] 

LITERAL 

CFA 

CTAB 

84 

+ ! 

( COMMAND 

OFFSET 

0X42 ) 

[ 

' SET-TEMP ] 


LITERAL 

CFA 

CTAB 

86 

+ ! 

( COMMAND 

OFFSET 

0X43 ) 

[ 

■ FRAME-TRANSFER 

3 LITERAL 

CFA 

CTAB 

88 

+ ! 

( COMMAND 

OFFSET 

0X44 ) 

[ 

1 FULL-FRAME 1 

LITERAL 

CFA 

CTAB 

8A 

+ ! 

( COMMAND 

OFFSET 

0X45 ) 

[ 

' NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

8C 

+ ! 

( COMMAND 

not defined ) 

[ 

1 NOT-DEFINED 

3 

LITERAL 

CFA 

CTAB 

8E 

+ ! 

( COMMAND 

not defined ) 

— 

— > if you extend 

this list, 

, be 

sure 

to 

update the MAX CMD in the following line 


47 CONSTANT MAX CMD 


wait for a command in mailbox 0 
if nothing light an led 
if MSDF put it on the stack 

if CRDY fetch command number and place on the stack 
repeat until a command is found ) 

also checks if host is willing to accept return data 

it will place the count of the available characters in MB3 and the 

value of the next data in MB4 


( POLL -CMD 
( 

( 

( 

( 

{ POLL-CMD 
( 

( 


( MBO is polled until a command is found to be ready, 

{ if MSDF, the data is fetched from MB1 and placed on the stack 

( When CRDY is true, the command is fetched from MB1, placed on the stack, 

( and the loop is exited, returning to RUN which will interpret the command. 

( It is assumed that the parameters needed for the proper execution of the command 

( will be found on the stack, if not, we will Crash. For now, no error checking 

( is performed to be sure that the command number found is legit. This safety 

( function will be added later. 



( 


: POLL-CMD 
BEGIN 
MSDF? 


IF ( 

MB2 MB@ 100 * { 

MB1 MBS + ( 

RDY 0 { 

ELSE < 

CRDY? IF ( 

MB1 MB@ 

DUP MAX_CMD > ( 

IF 

DROP ( 

CMD-ERR ( 

BSY ( 

100 M-WAIT 
RDY 0 ( 

ELSE 

1 ( 

THEN 

ELSE ( 

HEARTBEAT 0 ( 

THEN 


THEN 

SERVE -HOST 
UNTIL 


BSY ; 


if data . . . 

. . . fetch the top half 

... add in the bottom half, leave on stack 
... and go ready, but don't leave loop 
if no data . . . 
if there is a command . . . 

check if cmd exceeds range 

drop CMD if not valid 
issue error flag 

satisfy that host waits for the BSY flag 
( wait a while 

pretend to be ready and stay in loop 

if valid, keep it and leave loop to execute 

if no data or command 
... do LEDs, stay in loop 


HEX 

0C 


CONSTANT STOP { the value of CAM-HALT ) 


HEX 
: MAIN 


1204 7600 1200 0 1202 @ 
1200 @ 1202 0 - 1204 + 6 
SETUP 
BUILD 
INITLEDS 
DECIMAL 
GO_FOR_IT 0 
IF START -IRQ 
BEGIN 

POLL -CMD 
DUP STOP - 
IF TRUE 

ELSE CLEAR-FLAGS 
DUP 0 SWAP - 
LIGHTS C! 
DOCMD 

QM_FLAG 0 2- 
IF QM-ERR 
THEN 
RDY 
FALSE 

THEN 
UNTIL 
STOP -IRQ 


- CMOVE 
84 CMOVE 
( 


restore dictionary 
restore FORTH user area 


initialize bus interface 
( build the command table 
initialize the lights 
{ decimal mode please 
is it OK to start ? 

if so, start serial receive interrupt 
{ enter main command interpreter loop 
wait for a command 
check to see if it's cam-halt 
if so, leave TRUE to exit loop at UNTIL 
clear OK QM and CR flags {just to be safe} 


THEN 


{ 

{ 

( 

{ 

{ 

{ 

{ 
t 
{ 

{ show command number on LED panel 
( execute command 

{ did we get a question mark from the camera ? 

( if so, QM_FLAG is set, so terminate with error flag 

( command is done, we are ready 
( leave FALSE so we stay in loop at UNTIL 

( repeat until told to halt 
( stop serial receive interupt routine 


( ASTART! store the autostart sequence and the cfa 
{ of the autostart word in ext. eprom ) 

( to use a different word on startup, just replace the word restor 
( in the following definition with the name of whatever you would 
{ like the 6811 to do on power up. 

HEX 

400 CONSTANT ASTART 

: ASTART! 

EEUNPROT 

A44A DUP ASTART EE-! 

[ ' MAIN ] LITERAL CFA 
DICT-START - 
EEDICT-START + 



DUP ASTART 2+ EE-! 

EEPROT 

CR AUTOSTART SEQUENCE STORED " CR 


Appendix D: 'C' Language Interface Source Code 



/★*■*****★**★★★★*★*★*★★★★★★★**★★★★★★★*★★★*★★★★★★★★★★★★★★★★★★*♦** */ 

/* V 

/* ATDcam.c */ 

/* v 

/* Subroutines for Advanced Technologies VME interface. */ 

/* */ 

/* P Doherty, HJ Meyer, A Gale */ 

/* */ 

/* */ 

/* Rev. 2.0 4/2/92 */ 

/* lots of little changes, some major ones to the */ 

/* IRAF interface code. */ 

/* added lots more comments. V 

/* V 

/* Rev. 1.0 1/20/92 V 

/* finally extracted this from cam.c */ 

/* provides support for all ATD VME functions */ 

/* including all necessary to run either the V 

/* ATC5 cameras or the AIS or AIS2 */ 

/* */ 

/* */ 

/* */ 

/*★**★★**★★★*****★★★★***★★★*★****★**★***★*■******■*■**■*•*********** */ 

iinclude <stdio.h> 

#include <ermo.h> 

#include <fcntl.h> 

tinclude <sys/file.h> 

#include <sys/mman.h> 
finclude <sys/types ,h> 

/* # include <ctype.h> */ 

/* # include <string.h> */ 

/* 

#include "cam.h” 

# include M camhdw.h H 

*/ 

#include ,, ATDcamera.h n 

#ifdef BIT3 

#define BTS_M0DEL 466 

#include ,, btsio.h ,, 

#def ine TRUE 1 
#def ine FALSE 0 

char *map__mem () ; 
char *mapjbit3 () ; 

#define PAGE_SHFT 16 

idefine PAGE_SIZE (1 « PAGE_SHFT) 

#define PAGE_MASK (PAGE_SHFT - 1) 

#define MEMPAGE 0x1000 
# define MAI LP AGE 0x1200 

int gBit3fd; /* bit3 file descriptor */ 

struct bts reg *gNodeIO; /* pointer to the bit3 I/O registers */ 

unsigned short gMemPage - MEMPAGE; 

unsigned short gMailPage - MAILPAGE; 

#endif 

char *camera_base; 

/* extern struct system_params came ra_pa rams; */ 

/* PTVSI mailboxes */ 

extern unsigned char *mailbox0; 
extern unsigned char *mailboxl; 
extern unsigned char *mailbox2; 
extern unsigned char *mailbox3; 
extern unsigned char *mailbox4; 
extern unsigned char *mailbox5; 
extern unsigned char *mailbox6; 
extern unsigned char *mailbox7; 
extern unsigned char *mailbox8; 


extern unsigned char 
extern unsigned char 
extern unsigned char 
extern unsigned char 
extern unsigned char 
extern unsigned char 
extern unsigned char 


*mailbox9; 

*mailboxlO; 

*mailboxll; 

*mailbox!2; 

*mailboxl3; 

*mailboxl4; 

*mailbox!5; 


/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 


**************************** ********************** ****** * f 
****** ******* ****** ******* ********************* ********* * / 

*/ 

VME interface oriented commands */ 

*/ 

These commands are used to operate on the VME interface */ 
locally. No action is taken by the camera controller. */ 

*/ 

*/ 

****** ******* *********************** ********* *********** * j 

********************* ************* ************* ********* * j 


/* reset is used to reset the VME interface board. */ 

/* It is good practice to do so as your application */ 

/* first initializes. It assures that the interface */ 

/* is in a known state. */ 

/* camera_base is the base address of the command */ 

/* portion of the VME interface. */ 

/* This function is identical for ATDVME boards and */ 

/* VME200A boards. */ 

void reset () 

{ 

#ifdef BIT3 

gNodeIO->rem_page - MAI LP AGE; 

#endif 

*((char *) camerajbase + 0x3d) - CMD_RESET; 
usleep (3000000) ; 

return; 

} 


/* halt tells the on board microcontroller to cease */ 
/* interpretation of commands from the VME master and */ 
/* to begin interpreting FORTH commands coming in */ 
/* through the serial port on the camera connector. V 
/* This function is useful only for test purposes, and */ 
/* will lead to confusion if called while connected */ 
/* to the camera. */ 


void halt () 

{ 

issue_command (CMD_HALT) ; 
return; 

} 


/* ag_init is used to reset the "address generator" PLD */ 
/* This PLD controls the DRAM write of camera data. */ 
/* Sets the start address for subsequent camera data */ 
/* to the first location on the VME interface board. */ 
/* This function should be called before an image */ 
/* acquisition command like dark or obs. If a */ 
/* series of images is to acquired into DRAM before */ 
/* reading the data, then ag_init should be called */ 
/* only before the first acquisition. */ 


void ag_init() 

{ 

issue_command (CMD_AG_INIT) ; 
return; 

} 



/* spcon_init is used to initilize the serial to parallel */ 
/* convertor control PLD an VME200A type boards with */ 
/* serial data interface. Performs no useful or */ 
/* harmful function if called on a ATDVME Interface. */ 
/* The value passed is determined by the type and rate */ 
/* of the pixel data clock signal. The value used */ 

/* here, 7E, is for 40 kHz readouts. For a comlete */ 
/* explanation of how this works, see the VME200a V 
/* theory of operation. */ 


void spcon_init{) 

{ 

pass_char_param (0x3f) ; 
issue_command (CMD_SPCON_INIT) ; 
return; 

} 


/* spcon_reset is used to reset the serial to parallel */ 
/* convertor control PLD an VME2Q0A type boards with */ 
/* serial data interface. Performs no useful or */ 
/* harmful function if called on a ATDVME interface. */ 


void spcon_reset ( ) 

{ 

issue_command (CMD_SPCON_RESET) ; 
return; 

} 


/* The ATDvme interface includes an I/O port whose function */ 
/* reamins uncommitted. Acces to this port is granted to */ 


/* the user through the following set of fuctions. */ 
/* 

/* io_read is used to read the TTL data present on the */ 
/* ~ input bits of the user I/O port. */ 
/* Returns the value found. */ 


char io_read ( ) 

{ 

unsigned char value; 

#ifdef BIT3 

gNodeIO->rem_page - MAI LP AGE; 
iendif 

issue_command (CMD_I0RD) ; 
wait_cmd_done () ; 
value - *mailboxl; 
return (value) ; 

} 


/* io_write is used to write to the output bits of the */ 
/* user I/O port. */ 

void io_write (value) 
char value; 

{ 

pass_char__param (value) ; 
issue_command (CMD_I0WR) ; 
wait_cmd_done () ; 
return; 

} 


/* io pulse is used to pulse one of the bits on the user */ 
/* ~ I/O port for a given number of deci-seconds V 
/* This is useful for shutter drivers or filter wheels V 
/* This function will be changed to accept bit */ 
/* selection and millisecond timings. */ 


void io_pulse (decisecs) 

unsigned short decisecs; 


{ 

pass_short__param ( dec i secs) ; 
issue_command (CMD_IOPLS) ; 
wait_cmd_done () ; 
return; 

} 


/* 

/* 

/* 

/* 

/* 

/* 

/* 


******* ****★★★**★★**★***★**★*★ ************** ************ * j 
********************* ******* ******************** ******** * j 

*/ 

Camera Oriented Commands */ 

*/ 

****** * ************ ********************* ******** ******** * j 

******************************************************** * j 


/* 

cam_restart 

issues a series of command strings to 

the 

*/ 

/* 

camera 

controller . 

. These operations perform 

a 

*/ 

/* 

warm restart of the camera controller. This 

is 

V 

/* 

purely 

a software 

reset . No hardware reset of the 

*/ 

/* 

camera 

controller 

is available through the VME 

*/ 

/* 

interface board. 



*/ 


void cam_re start () 

{ 

issue_command (CMD_CAM_RE START) ; 
wait_cmd_done () ; 
read_cam_buffer {) ; 
return; 

} 


/* set_param is used to set a camera parameter. Parameters */ 
/* are static variables associated with camera */ 

/* operation and CCD readout. Parameters are described */ 

/* in detail elsewhere. */ 

void set_param (offset, value) 
unsigned short offset; 
unsigned short value; 

{ 

pass_short__param (offset); 
pass_short_param (value) ; 
cam__command (CMD_SET_PARAM) ; 

return; 

} 


/* ATD cameras are capable of performing continuous clear */ 
/* operations on the CCD while the camera is idle. The */ 

/* following two functions are used to turn this on and off.*/ 

void cisc_on () 

{ 

cam_command (CMD_CISCON) ; 
return; 

} 

void cisc_off () 

{ 

cam_command (CMD_CISCOFF) ; 
return; 

} 


/* anti_bloom_on is used to enable clock recombination */ 
/* anti-blooming. After this function called, CRAB */ 
/* will be performed during exposures. */ 
/* THIS FUNCTION IS NOT FULLY IMPLEMENTED IN THE ATC5 */ 
/* CAMERAS AND WILL PRODUCE UNDESIRABLE EFFECTS. */ 


void anti bloom on() 



{ 

cain_command {CMD_ANTI JBLCOM_ON) ; 
return; 

} 


/* ant i_b 1 oom_of f this function is used to disable the */ 

/* clock recombination anti-blooming mode of operation */ 

/* CRAB will not be performed during exposures after */ 

/* this function is called. */ 

void anti_bloom_off () 

{ 

cam_c ommand ( CMD_ANT I J3 LOOM_OFF ) ; 
return; 

} 


/* The ATC5 and AIS2 cameras are capable of running at two */ 
/* different speeds. In the ATC5 camera, the hardware that */ 
/* is required may or may not have been purchased. If not, */ 
/* setting the camera to low speed will produce invalid */ 
/* data. The AIS camera does not support this option at all.*/ 

void cam_fast() 

{ 

cam_c ommand (CMD_CAM__F AST) ; 
return; 

} 

void cam_slow{) 

{ 

cam_c ommand (CMD_CAM_SLOW) ; 
return; 

) 


/* The gain of all the ATD cameras may be adjusted by the */ 
/* user. */ 
/* The ATC5 cameras have a gain switch allowing the */ 
/* camera to be operated in two gain modes. The exact */ 
/* value of the gain in either mode is determined by the */ 
/* adjustments made to the camera during integration and */ 
/* test. */ 
/* The AIS cameras have a dual slope integrator based */ 
/* architecture in the analog processing, and the camera */ 
/* gain may be adjusted nearly continuously by changing the */ 
/* dual slope integrators integration time. Three standard */ 
/* gain modes are provided here. */ 


void ATC5_gain_hi() 

{ 

cam_c ommand (CMD_GAIN_HI) ; 
return; 

} 

void ATC5_gain_lo<) 

{ 

cam_c ommand (CMD_GAIN_LO) ; 
return; 

} 


void AIS_gain_lo() 

{ 

} 

void AIS_gain_mid() 

{ 

} 

void AIS_gainJii(> 

{ 

} 


Q- 


/* cam_offset sets the camera's bias offset to a new value */ 
/* cam_offset requires one parameter: the new value to */ 

/* be written to the offset DAC in the camera head. */ 

/* This value may range from 0 to 255. */ 

/* This function operates on ATC5 cameras and on AIS2 */ 

/* cameras, but performs no function on an AIS. */ 

void cam_offset (value) 
char value; 

{ 

pass_char_param (value); 
cam_command (CMD_OFFSET) ; 
return; 

} 


/* CCD_temp<) is used to query the temperature of the CCD. */ 
/* Inthe ATC5, the CCD is coooled by a thermo- */ 

/* electrtric cooler located in the vacuun chamber.*/ 

/* In the AIS cameras, the CCD is cooled by a tank */ 

/* of liquid nitrogen located in the dewar. */ 

void CCD_temp ( ) 

{ 

cam_command(CMD_TEMPO) ; 
return; 

} 


/* case_temp() is used to query the temperature of the back */ 
/* side of the CCD chamber, which is heated by the */ 

/* thermoelectric cooler. The temperature is */ 

/* returned as aformatted ASCII text string. */ 

void case_temp() 

( 

cam_command (CMD_TEMP1) ; 
return; 

} 


/* set_temp() is used to set the desried operating point for */ 
/* the CCD. A signed 8 bit value is expected. For */ 

/* practical purposes, the temperature of an ATC5 */ 

/* camera will not stabilize more than approx. 65 */ 

/* degrees below ambiant. An AIS, with a nitrogen */ 

/* dewar, should reach temperatures below -80 deg C.*/ 

void temp_set (value) 
char value; 

{ 

pass_s_char_param (value) ; 
cam_command(CMD_SET_TEMP) ; 
return; 

} 


/* oshut opens the shutter on the camera. The camera */ 
/* controller will pause for ODELAY milliseconds */ 

/* after and then return. */ 

void oshut () 

{ 

cam_command (CMD_0SHUT) ; 
return; 

} 


*/ 
*/ 
V 

void cshut ( ) 

{ 

cam_command (CMD_CSHUT) ; 
return; 


/* cshut closes the shutter on the camera. The camera 
/* controller will pause for CDELAY milliseconds 
/* after and then return. 



} 


/* pixjbin is used to request that the camera controller bin */ 
/* a number of pixels into the CCD summing well. One */ 
/* parameter is required: npix, the number of pixels V 
f* to bin. Simply put, npix CCD serial shift operations */ 
/* are performed. */ 


void pix_bin (npix) 

unsigned short npix; 

{ 

pass_short_param (npix) ; 
cam_c omma nd ( CMD_P I X_B IN ) ; 
return ; 

} 


/* row_bin is used to request that the camera controller bin */ 
/* “a number of rows into the CCD serial register. One */ 
/* parameter is required: nrows, the number of rows to V 
/★ bin. Simply put, nrows CCD parallel shift operations */ 
/* are performed. */ 


void row_bin (nrows) 

unsigned short nrows; 

{ 

pass_short_param (nrows) ; 
cam_command ( CMD_ROW_B IN ) ; 
return; 

} 


/* pix_discard is used to request that the camera controller */ 
/* discard a number of pixels in the CCD serial register. */ 

/* One parameter is required: npix, the number of pixels */ 

/* to discard. */ 

void pix_discard (npix) 
unsigned short npix; 

{ 

pass_short_param (npix) ; 
cam_command (CMD_PIX_DISCARD) ; 
return; 

} 


/* row_discard is used to request that the camera controller */ 
/* “ discard a number of rows in the CCD parallel register. */ 
/* One parameter is required: nrows, the number of rows */ 
/* to discard. */ 


void row_discard (nrows) 
unsigned short nrows; 

{ 

pass_short_param (nrows) ; 
cam_command (CMD_ROW_DISCARD) ; 
return ; 

} 


/* pix_read is used to request that the camera controller */ 
/* read a number of pixels in the CCD serial register. */ 
/* One parameter is required: npix, the number of pixels */ 
/* to read. */ 


void pix_read (npix) 

unsigned short npix; 

{ 

pass_short_param (npix) ; 
cam_command { CMD_P I X_RE AD ) ; 
return; 

} 



*/ 
*/ 
*/ 
V 

void row_read (nrows) 

unsigned short nrows; 

{ 

pass_short_j)aram (nrows) ; 
cam_command ( CMD_ROW_RE AD ) ; 
return; 

} 


/* row_read is used to request that the camera controller 
/* read a number of rows in the CCD parallel register. 

/* One parameter is required: nrows, the number of rows 

/* to read. 


/* cam_write is used to request that the camera controller */ 
/* write a value to a sequencer address. Such addresses V 
/* might be the camera control latches or any stored */ 
/* parameters. This is an extremely low level operation, */ 
/* and should only be performed if one knows exactly what */ 
/* one is doing. This command may be eliminated in the */ 
/* near future. V 


void cam_write (address, datum) 
unsigned short address; 
unsigned short datum; 

{ 

pass_short_param (address) ; 
pass_short_param (datum) ; 
cam_command (CMD_CAM_WRITE ) ; 
return; 

} 


/* get_f ormat is used to get an unformatted list of the 
/* current settings ofthe system parameters. 


void get_f ormat ( ) 

{ 

cam_command (CMD_FORMAT) ; 
return; 


*/ 

*/ 


/* set_f ormat is used to initialize the camera controller */ 
/* sequencer with the current format params. When V 

/* parameters are set with set_param, the sequencer */ 

/* is NOT updated. A subsequent set_f ormat command is */ 

/* required to assure that the sequencer will use the */ 

/* updated format. */ 

void set_f ormat ( ) 

{ 

cam_command(CMD_SET_FORMAT) ; 
return ; 

) 


/* clear is used to request that the camera controller */ 

/* clear all charge off the CCD. The CCD is actually */ 

/* cleared NUM_CLEARS times. */ 

void clear () 

{ 

cam_command (CMDjCLEAR) ; 
return; 

} 


/* integrate_dark is used in a low level control mode to */ 
/* integrate dark current on the CCD device. */ 
/* The shutter */ 


void integrate_dark () 


{ 

cam command (CMD INTEGRATE CCD) ; 



return; 

} 


/* integrate_light is used in a low level control mode to */ 
/* integrate light on the CCD device. */ 

/* The shutter */ 

void integrate_light () 

{ 

cam__command ( CMD_INTEGRATE_CCD ) ; 
return; 

} 


/* shade is used to request that the camera controller */ 
/* generate the test data stream. The amount of data and */ 
/* its form will depend on the current status of the */ 
/* format parameters. READ_PAR rows will be produced */ 
/* with READ_SER pixels in each row. Each pixel in the */ 


/* row will have the same value. The value will increment */ 

/* by one each row. The first row will have the value of V 

/* ORG_PAR. Multiple shade patterns may be produced. The */ 

/* number of shades produced is equal to the current value */ 

/* of the NUM_ IMAGES parameter. V 

void shade ( ) 

{ 

ag_init () ; 

cam_command (CMD_SHADE) ; 
return; 

} 


/* readout is used to request that the camera controller */ 

/* read the image off the CCD based on the current */ 

/* format parameters. The CCD will actually be read */ 

/* NUM_ IMAGES times. */ 

/* In this example we call ag_init() to point the data */ 

/* pointer to the start of the DRAM array, but this is not */ 

/* necessary, and would be undesirable if you desired to */ 

/* "stack" several images in the DRAM before fetching the */ 

/* data. */ 

void readout () 

{ 

iifdef AIS 

spcon_reset () ; 
spcon_init () ; 

#endif 

ag_init (); 

cam_command (CMD_READ) ; 
return; 

} 


/* bias is used to generate in image of the CCD with no */ 
/* charge on it. The shutter is closed, the CCD is */ 
/* cleared NUM_C LEARS times, and the image is read out. V 
/* This complete cycle is performed NUM_IMAGES times. */ 
/* In this example we call ag_init{) to point the data */ 
/* pointer to the start of the DRAM array, but this is not */ 
/* necessary, and would be undesirable if you desired to */ 
/* "stack" several images in the DRAM before fetching the V 
/* data. */ 


void bias ( ) 

{ 

tifdef AIS 

spcon_reset ( ) ; 
spcon_init () ; 
tendif 

ag_init ( ) ; 

cam_command (CMD_BIAS) ; 
return; 

} 


/* expose 

/* this function is redundant to the OBS command below. 


V 

*/ 



/* and exists only for some obsolete application code */ 
/* which expects it. */ 
/* In this example we call ag_init<) to point the data */ 
/* pointer to the start of the DRAM array, but this is not */ 
/* necessary, and would be undesirable if you desired to */ 
/* "stack" several images in the DRAM before fetching the */ 
/* data. */ 


void expose (exptime) 

unsigned long exptime; 

{ 

ag_init { ) ; 

set_exposure_t ime ( expt ime ) ; 
cam_command (CMD_OBS) ; 
return; 

} 


/* dark this function is called to generate an image of the CCD */ 
/* with dark current. The shuter is closed, the CCD is V 
/* cleared, dark currwent is allowed to build for exptime */ 
/* milliseconds, and the chip is read out. This entire */ 
/* cycle is repeated NUM_ IMAGES times. */ 
/* In this example we call ag_init() to point the data */ 
/* pointer to the start of the DRAM array, but this is not */ 
/* necessary, and would be undesirable if you desired to */ 
/* "stack" several images in the DRAM before fetching the */ 
/* data. */ 


void dark (exptime) 

unsigned long exptime; 

{ 

set_exposure_time (exptime) ; 

#ifdef AIS 

spcon_reset () ; 
spcon_init () ; 

#endif 

ag_init (); 

cam_command (CMD_DARK) ; 
return; 

} 


/* obs this command is used to generate an object exposure V 
/* image. The shutter is closed, the CCD is cleared, the */ 
/* shutter is opened, light is accumulated for exptime */ 
/* milliseconds, the shutter is closed, and the image is */ 
/* read out. This complete cycle is repeated NUM_IMAGES */ 
/* times. */ 
/* In this example we call ag_init{) to point the data */ 
/* pointer to the start of the DRAM array, but this is not */ 
/* necessary, and would be undesirable if you desired to */ 
/* "stack" several images in the DRAM before fetching the */ 
/* data. */ 


void obs (exptime) 

unsigned long exptime; 

{ 

set_exposure_time (exptime); 

#ifdef AIS 

spcon_reset (); 
spcon_init () ; 

#endif 

ag_init () ; 

cam_comnand (CMD_OBS) ; 
return; 

} 


void send_cam_char (achar) 
char achar; 

{ 

pass_char_j3aram (achar) ; 
cam_command(CMD__SEND_STRING) ; 
return; 

} 



/★ ***•*★★*★*★****★★****★*★***★******★★****★*■*★**★★★★**★★**★ */ 
/* Text transfer cormands */ 

j * **★*★*•****★★★★**★*■***************★************'**'*'******* */ 


/* send file is used to send an ASCII text file to the */ 

/* camera. The file is assumed to consist of FORTH V 

void send_file (filename) 
char ^filename; 

{ 

FILE *theFile; 
int compiling; 
char thisChar; 

flush_buffer() ; /* empty the serial text buffer on the board */ 

if ( (theFile - fopen (filename, "r")) >“ 0) 

thisChar - 0x00; /* we haven't got any characters yet ... */ 

compiling - 0 ; /* ... and we're not compiling yet */ 

while ( thisChar !- EOF ) 

/* fscanf (theFile, "%c", fithisChar) ; /* read a char from the file 

V 

thisChar - getc (theFile) ; 


if ( thisChar -- 0x0a) /* if its a line feed... */ 

thisChar - OxOd; /* . . . make it a carriage return */ 

if ( thisChar !- EOF ) /* if not end of file ... */ 

send_cam_char (thisChar); /* ... send it to the camera */ 

if ( thisChar — • : 1 ) /* if the char is a colon ... */ 

compiling - 1 ; /* . . . then we're compiling. */ 

if ( thisChar /* if the char is a semi-colon ... */ 

compiling - 0 ; /* ... we're not compiling anymore. */ 

if ( thisChar -- OxOd ) /* if the char is a carriage return . . . */ 

if (compiling) /* ... and we're compiling ... */ 

wait_CR_LF (); /* . . . just wait for CR LF */ 

else 

{ /* ... and we're not compiling ... */ 

wait_OK () ; /* ... wait for an 'OK' ... */ 


wait_CR_LF () ; /* ... and then a CR LF sequence. */ 

} 

} 

} 

} 

else 

fprintf (stderr, "Error opening %s", filename); 
return; 

} 


/* send_string is used to send an arbitrary string to */ 
/* the camera. This is useful in a variety of ways. */ 
/* Any command may be issued this way. A carriage */ 
/* return is appended to the end of the string. */ 
/* The camera should respond with an 'OK', but this */ 
/* function does not wait for it. */ 


void send_string (theString) 
char *theString; 

{ 

char aChar; 

aChar - 0x00; 
while (aChar !- OxOD) 

{ 

aChar - *theString++; 


if (aChar !- 0x00) 


{ 

send_cam_char (aChar) ; 
} 

else 

{ 

aChar - OxOD; 
send_cam_char (aChar) ; 
} 

} 

return; 

} 


/* wait_OK is used to wait until an 'OK' response has been */ 
/* received from the camera */ 

void wait_OK () 

{ 

int done; 

char theChar; 

done “0; 
while (done-0) 

{ 

theChar - get_a_char ( ) ; 

#ifdef VERBOSE 

fprintf ( stderr r "%c", theChar) ; 

#endif 

if ( theChar — *0' ) 

{ 

theChar - get_a_char { ) ; 

#ifdef VERBOSE 

fprintf ( stderr, "%c", theChar) ; 

#endif 

if ( theChar — 'K* ) 
done - 1 ; 

} 

} 

} 


/* wait_CR_LF is used to wait until an carriage return */ 
/* line feed pair has been recieved from the camera */ 

void wait_CR_LF { ) 

{ 

int done; 

char theChar; 

done - 0; 
while (done-0) 

{ 

theChar - get_a_char { ) ; 

#ifdef VERBOSE 

fprintf ( stderr, M %c", theChar) ; 

#endif 

if ( theChar -- OxOd ) 

{ 

theChar =■ get_a_char 0 ; 

#ifdef VERBOSE 

fprintf ( stderr, "%c M , theChar ) ; 

#endif 

if ( theChar -- 0x0a ) 
done - 1 ; 

} 

} 

} 


/* ****★*★**★*★★*★★★★★*★**★★**★★★★★★★*★**★★*★*★★★★********* ★/ 
/* read buffer functions */ 

/★ ★***★*★★★★★★★★*★★**★★*★*★★**★*★*★*★★★*★**★★★**★*★**★★★** */ 


void flush buffer () 



{ 

issue_command (CMD_FLUSH_BUFFER) ; 

wait_cmd_done { ) ; 

return; 

} 


/* read_cam_buffer is used to fetch all the characters in */ 
/* the serial input bufer. This is useful for */ 

/* monitoring the camera's responses to some commands. */ 

void read_cam_buf fer () 

{ 

unsigned char count; 
unsigned char thechar; 

#ifdef BIT3 

gNode 10->rem_page - MAI LP AGE; 
fendif 

count - *mailbox3; 
while ( count !- 0 > 

{ 

thechar - get_a__char () ; 
if (thechar !- Oxff) 

#ifdef VERBOSE 

fprintf ( stderr, "%c", thechar) ; 

#endif 

count - *mailbox3; 

} 

return; 

) 


/* get_a_char is used to fetch a character from the serial */ 

/* input buffer. This function includes a time out. */ 

char get_a_char() 

{ 

unsigned char myChar; 
int i; 

#ifdef BIT3 

gNode 10->rem_page » MAI LP AGE; 

#endif 

*mailbox6 - SMDR ; /* tell 6811 we're ready for serial data */ 
i»0; 

while ( (*mailbox6 — SMDR) && (i < 10000010) ) 
i++; 

if (iclOOOOOOO) { 

myChar - ^mailbox4; 

} 

else { 

printf ("%s/n", "Timeout while reading from controller."); 
myChar - Oxff; 

} 

return (myChar) ; 

} 


/★ *★*★★★★★★★**★★*★★★★*★**********★*★★*★★★*★*************** */ 
/* parameter transfer functions */ 

f* *★★★★*★**★★★★*★★★★★*★★★**•*★★★*★★★**★★★★**★*★★★★*★******* */ 

/* pass_short w param is used to pass function parameters V 
/* to the on board microcontroller before issuing */ 

/* commands. This function is used to pass parameters */ 

/* of the short integer type. V 


void pass_short_param (theshort) 
unsigned short theshort; 

{ 

unsigned char low_byte; 
unsigned char high_byte; 


#ifdef BIT3 

gNode I 0-> r em_page - MAI LP AGE; 

#endif 

wait_cmd_done ( ) ; 

/* Load the high byte of the datum into mailbox 2*f 
high_byte - (unsigned char) (theshort » 8) ; 
*mailbox2 - highjbyte; 

/* Load the low byte of the datum into mailbox 1*/ 
lowjbyte - (unsigned char) (theshort & OxOOff) ; 
*mailboxl - low_byte; 

set_msdf ( ) ; 
wait_cmd_done ( ) ; 
return; 

) 


/* pass_char_j>aram Is used to pass function parameters to the */ 
/* on board microcontroller before issuing commands. */ 

/* This function is used to pass parameters of the */ 

/* char type. All parameters are unsigned. */ 

void pass_char_j>aram (thechar) 
unsigned char thechar; 

{ 

#ifdef BIT3 

gNode 10->rem_page - MAI LP AGE; 

#endif 

wait_cmd__done ( ) ; 

/* clear the high byte in mailbox 2*/ 

*mailbox2 - 0; 

*mailboxl - thechar; 

set_msdf ( ) ; 
wa it_cmd_done ( ) ; 
return; 

} 


/* pass_s_char_param is used to pass function parameters */ 


/* — to the on board microcontroller before issuing */ 
/* commands. */ 
/* This function is used to pass parameters of the */ 
/* char type. All parameters are signed. */ 


void pass_s_char_param (thechar) 
char thechar; 

{ 

#ifdef BIT3 

gNode 10->rem__page - MAI LP AGE; 

#endif 

wa it_cmd_done ( ) ; 

/* clear the high byte in mailbox 2*/ 
*mailbox2 - 0; 

*mailboxl - thechar; 

setjnsdf ( ) ; 
wait__cmd_done ( ) ; 
return; 

} 


j-k **★*★★***★*★★★★*★★**★★★**★★***★★*★★*★★★**★*★★***★*★★*****★★* */ 

/* functions used to issue commands to the controller */ 

fit ****★★★★★★**★****★*★**★★****★******★*******★★*******'******** * f 

/* cam_command issues command, waits for completion, checks */ 
/* for command errors, and echoes buffer contents. */ 

void cam_command ( cmd) 
char cmd; 

{ 

char status; 


wait and done () ; 



issue_command(cmd) ; 
wait_cmd_done ( ) ; 
check_error {cmd> ; 
read_cam_bu f f e r ( ) ; 
return; 

} 


/* g_cam_command issues command,, waits for completion, checks */ 
/* for command errors, and flushes serial input buffer. */ 

void q_cam_command(cmd) 
char cmd; 

{ 

char status; 

wait_cmd_done ( ) ; 
issue_command(cmd) ; 
wait_cmd_done ( ) ; 
check_error (cmd) ; 
flush_buffer () ; 
return ; 

} 


/* issue command waits for the board to complete execution*/ 


/* of the last function called then writes the new */ 
/* command number to mailboxl and sets the command */ 
/* ready flag in mailboxO. This function does not wait */ 
/* until the camera and interface are done with the */ 
/* execution of the command. */ 


void issue_command (cmd) 
char cmd; 

{ 

char status; 

#ifdef BIT3 

gNodeIO->rem_page - MAI IP AGE; 
tendif 

wait_cmd_done ( ) ; 

♦mailboxl - cmd; 

♦mailboxO - CRDY; 
return; 

} 


/* ★***★★****★★****★*★★****★★★*★★**★★********************* */ 
/* flag manipulation functions */ 

/★ *★★★**★*★★★*★**★★********★***************************** */ 


/* set_msdf sets the master to slave data full bit in */ 
/* the status register. */ 

void set_msdf() 

{ 

tifdef BIT3 

gNodeIO->rem_page - MAILPAGE; 

#endif 

♦mailboxO - MSDF; 
return; 

} 


/* wait_cmd_done waits until the 6811 has completed the */ 
/* — last function called. When done, then 6811 will */ 

/* clear mailbox 0 */ 

void wait_cmd_done () 

{ 

char status; 


fifdef BIT3 


gNodeIO->rem_page - MAILPAGE; 
#endif 

status - *mailboxO; 
while ( status !- 0 ) 

{ 

status - *mailboxO; 

} 

return; 

} 


jk kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk * j 

/* error handling function */ 

jit kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk * j 


void check_error (and) 
char cmd; 

{ 

if (*mailbox5 — 0) 

return; 

else 

{ 

printf ("XnError in command %x, error code %x\n", cmd, *mailbox5) ; 
issue_command(CMD_ERROR_RESET) ; 
wa it_cmd__done ( ) ; 
if (*mailbox5 !- 0) 

printf ("%s\n", "Fatal error: can't reset error flag. Propose reset.") 

} 

return; 

} 


j-k kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk kj 

/* Higher level commands built from the command set */ 

/* and provided as examples. Used internally by ATD test */ 

/* software. 

jk kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk kj 


/* cam_init is used in quickview to initialize the camera */ 
/* parameter set with the current values in a struct */ 
/* called cparams. */ 


/* 

/* void caminit (cparams) 

/* struct systemjparams * cparams ; 

/* { 

/* unsigned short tempval; 

/* static int first_time - 1; 

/* 

/* 

/* /* Write camera system parameters */ 

/* set_param (CCDSER, cparams->sdim) ; 

/* set^param (CCDSER, cparams->sdim) ; 

/* set_param(CCDPAR,cparams->pdim) ; 

/* set_param (BINSER, cparams->sbin) ; 

/* set_jjaram (BINPAR, cparams->pbin ) ; 

/* set jparam (ORGSER, cparams ->sorg + cparams->spre) ; 

/* set_param (ORGPAR, cparams->porg + cparams->ppre) ; 

/* set_param (READSER, cparams->srdlen) ; 

/* set_param (READPAR, cparams->prdlen ) ; 

/* 

/* tempval - cparams~>sdim - 

/* ( cparams->sorg + ( cparams->sbin * cparams->srdlen) ) 

/* + cparams->spost ; 

/* 

/* if ( tempval < 0x7fff ) 

/* set_param (POSTSER, tempval ) ; 

/* else 

/* set_param (POSTSER, 0) ; 

/* 

/* tempval - cparams->pdim - 

/* ( cparams->porg + ( cparams->pbin * cparams->prdlen) ) 

/* + cparams->ppost ; 

/* 

/* if ( tempval < 0x7fff ) 

/* set param (POSTPAR, tempval) ; 



set^param (POSTSER, 0) ; 


/* else 
/* 

/* 

/* set^param (PRESER, 0 ) ; 

/* set_param (UNDERSER, 0) ; 

/* set_param (OVERSER, 0) ; 

/* set_param(OVERPAR, 0) ; 

/* set^param (PARDELAY, cparams->pdelay ) ; 
/* 

/* set_param(ODELAY, cparams->odelay) ; 

/* set _j>aram (CDELAY, cparams->cdelay) ; 

/* 

/* if (cparams->cisc) 

/* cisc_on{); 

/* else 

/* cisc_pff(); 

/* 

/* set_param(EXPL, 200) ; 

/* set_param(EXPH, 0) ; 

/* set_param(NUMC LEARS, 2) ; 

/* set^aram(NUMIMAGES, 1) ; 

/* set_j>aram (IM_WAIT_LO, 50) ; 

/* set^param (IM_WAIT_HI, 0) ; 

/* 

/* set_param(GSPFLAG, 0) ; 

/* set_param (GSP_CAP_WIN, 0) ; 

/* set^param (GSP_CAP_X f 0 ) ; 

/* set_param (GSP_CAP_Y, 0) ; 

/* set_param(GSP_DIS_WIN,0) ; 

/* 

/* 

/* 

/* set_format () ; 

/*#ifdef AIS 

/* send_f ile ("AlSinit”) ; 

/*#endif AIS 
/* 

i * re ad_cam_bu f f e r ( ) ; 

/* 

/* return; 

/* } 

/* 

*/ 


void set_exposure_t ime (exptime) 
unsigned long exptime; 

{ 

unsigned short lotime; 
unsigned short hitime; 

lotime - (unsigned short) exptime; 
set_param(EXPL, lotime); 

hitime - (unsigned short) (exptime » 16); 

set_param (EXPH , hit ime ) ; 

return; 

} 


/* rexpose accepts two parameters the exposure time and the */ 
/* number of exposures desired. */ 

void rexpose (exptime, count) 
unsigned long exptime; 
int count; 

{ 

int i ; 

set_exposure_t ime (exptime) ; 
for (i-0; iccount; i++) 

{ 

ag_init () ; 

cam_command (CMD_0BS) ; 

} 

return; 

> 



void rbias (count) 
int count; 

{ 

int i; 

for (i«0;i<count;i++) 
bias () ; 
return ; 

} 


void robs (exptime, count) 
unsigned long exptime; 
int count; 

{ 

int i; 

for (i«0;i<count;i++) 
obs (exptiine) ; 
return; 

} 


/* AIS cameras have additional flexibility not available in the ATC5. */ 
/* Clock voltages and clock sequence are programable. */ 

/* The following functions are available to initialize these to the */ 

/* desired values. This would normally only be done as a maintenance */ 
/* function or in the integration of an new CCD imager. */ 

/* It is assumed that the user has retained the file naming convention */ 
/* wherein timing information is stored in a file named AlStiming and */ 
/* clock voltage settings are retained in a file named AlSvolts. */ 

/* If you change the name of the files, you've got to change this code */ 
/* */ 


#ifdef AIS 

/* AI S_in it_vo It s send the file that sets the clock rail voltages */ 

void AIS_init_volts () 

{ 

send_file ("AISvolts M ) ; 
return; 

} 


/* AIS_init_timing send the file that sets the timing parameters */ 

void AIS_init_timing() 

{ 

send_file ("AlStiming") ; 
return; 

} 

#endif AIS 


jit ******************************************************* * f 

/* dummy routines just to keep the rest of quickview happy */ 

f* *★***★**★★***★★*******★★★★★***★**★★*****★**★**★***★**★* */ 


void rdark (exptime, count) 
unsigned long exptime; 
char count; 

{ 

} 

void trig_arm(cmd) 
char cmd; 

{ 

} 

void focus (exptime) 

unsigned long exptime; 

{ 

} 


void send stop() 



} 


void nexpose() 

{ 

} 

void trig_disarm() 
{ 

} 

void camwait() 

{ 

} 


void slavewaitO 
{ 

} 


*****★★**★★•*■**★★*★★***★★***★★***★★*■*★**★*★★★★*★★**★★★**★★**■* * / 
/* test functions, used for low level debugging at ATD only. */ 

j-k ★★★★★★★★***★**★**★★★★*♦★***★*★★**★★★★★★*****★★*****★*★****'*★ */ 


void get_mbs (} 

{ 

unsigned char i; 


tifdef BIT3 


gNodeIO->rem_page - MAI LP AGE; 


#endi f 

fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
fprintf (stderr, 
} 


mailboxl 

- 

%x 

mailboxO 

- 

%x 

mailbox2 

- 

%x 

mailbox 3 

- 

%x 

mailbox4 

- 

%x 

mailboxS 

- 

%x 

mailbox 6 

- 

%x 

mailbox7 

- 

%x 

mailbox8 

- 

%x 

mailbox 9 


%x 

mailboxlO 

- 

%x 

mailboxll 

= 

%x 

mailboxl 2 

= 

%x 

mailboxl 3 

- 

%x 


\n", *mailboxO); 
\n M , *mailboxl); 
\n M , *mailbox2); 
\n H , *mailbox3) ; 
\n", *mailbox4); 
\n", *mailbox5); 
\n", *mailbox6) ; 
\n", *mailbox7); 
\n H , *mailbox8); 
\n M , *mailbox9) ; 
\n", *mailboxlO) ; 
\n", *mailboxll) ; 
\n H , *mailboxl2); 
\n ,f , *mailboxl3); 


/* open_devices.c 
/* 

/* A 'C* language program that open's the necessary device drivers 

/* for communicating with either an ATDVME1 VMEbus interface or a VME200a 

/* interface. Used when controlling ATC5 or AIS cameras under UNIX. 

/* 

/* Used at Advanced Technologies in Sun workstations with or without the 

/* Bit3 Sbus to VMEbus adaptor 

/* 

/* History: 

/* revision 1.0 1/22/92 ped 

/* extracted as necessary from ccd.c 

/* thoroughly untested 

I* 


*/ 

*/ 

*/ 

*/ 

V 
*/ 
*/ 
*/ 

V 
*/ 
*/ 
*/ 
*/ 
*/ 


void *ram_base; 
int ram_pbase; 
int ram len; 


/* pointer to mmaped image buffer ram */ 
/* the physical starting address of external memory */ 
/* the length, in bytes, of external memory */ 


char *camera_base; 
int cam_pbase; 
int cam len; 


/* pointer to mmapped controller */ 
/* the physical starting address of controller */ 
/* the length, in bytes, of the controller interface */ 


unsigned char *mailbox0; 
unsigned char *mailboxl; 
unsigned char *mailbox2; 
unsigned char *mailbox3; 
unsigned char *mailbox4; 


unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 
unsigned char 


*mailbox5; 

*mailbox6; 

*mailbox7; 

*mailbox8; 

♦mailbox 9; 

♦mailboxlO; 

♦mailboxll; 

*mailboxl2; 

*mailbox!3; 

*mailboxl4; 

*mailboxl5; 


char *map_VME_de vices {); 
void ATD_init_devices ( ) ; 


void ATD_init_devices () 

{ 

/* NOTE : hard coded addresses for 


cam_pbase - 0x10800000; /* 

cam_len - 0x200; /* 

rainj)base - 0x10000000; /* 

ram_len - 0x800000; /* 


#ifdef BIT3 

init_bit3 {) ; 

#endif BIT3 

/* Map the controller device into 


the VMEbus interface board ! */ 

physical address of controller portion */ 
length, in bytes, of controller portion */ 

physical address of DRAM portion */ 

length of DRAM portion */ 

iser address space */ 


#ifdef BIT3 

camerajbase - (char *) map__bit3 () ; 

#else BIT3 

camera_base - (char *) map J/ME_de vices (cam_pbase, cam_len) ; 
#endi f BIT3 


/* assign values to the mailbox pointers */ 


mailboxO 

- 

(unsigned 

char 

*> 

camera^ 

base 

+ 

l; 

mailboxl 

- 

(unsigned 

char 

*) 

camera] 

]base 

+ 

3; 

mailbox2 

- 

(unsigned 

char 

*> 

camera^ 

]base 

+ 

5; 

mailbox3 

- 

(unsigned 

char 

*) 

camera] 

]base 

+ 

7; 

mailbox4 

- 

(unsigned 

char 

*) 

camera_ 

]base 

+ 

9; 

mailboxS 

- 

(unsigned 

char 

*) 

camera] 

"base 

+ 

ll; 

mailbox 6 

- 

(unsigned 

char 

*) 

camera] 

"base 

+ 

13; 

mailbox7 

- 

(unsigned 

char 

*) 

carrvera_ 

"base 

+ 

15; 

mailbox8 

- 

(unsigned 

char 

*) 

camera_ 

"base 

+ 

17; 

mailbox 9 

- 

(unsigned 

char 

*) 

camera] 

base 

+ 

19; 

mailboxlO 

- 

(unsigned 

char 

*) 

camera] 

"base 


21; 

mailboxll 

- 

(unsigned 

char 

*) 

camera] 

base 

+ 

23; 

mailboxl2 

- 

(unsigned 

char 

*) 

camera] 

jbase 

+ 

25; 

mailboxl3 

- 

(unsigned 

char 

*) 

camera_ 

]base 

+ 

27; 

mailboxl4 

- 

(unsigned 

char 

*) 

camera] 

"base 


29; 

mailboxl5 

- 

(unsigned 

char 

*) 

camera" 

"base 

+ 

31; 


/* Map DRAM memory device into user address space */ 


#ifdef BIT3 

ramjbase - camerajbase; 

#else BIT3 

ramjbase - (char *) map_VME_de vices (ram_j>base, ram_len) ; 
#endif BIT3 
} 


/♦ 

map_VME_de vices 

mmaps devices into virtual address space 

*/ 

/* 



*/ 

/* 

accepts two 

parameters : 

*/ 

/* 

addr 

physical address of VME device 

*/ 

/* 

len 

length, in bytes, of VME device 

*/ 

/* 



*/ 

/* 

called when 

no bit3 Sbus to VME adaptor is used 

*/ 

/* 



*/ 


char *map__VME_de vices (addr, len) 
int addr; 
int len; 



{ 

int fd; 
char *base; 

char * filename - n /dev/vme32d32"; 

/* filename - n /dev/vmel6d32"; */ 

/* filename - n /dev/vme24d32"; */ 


/* open the device : If successful mmap the device */ 
if ((fd - open (filename, 0_RDWR) ) >« 0) 

base - (char *) mmap ({char *) 0, len, PR0T_READ I PROT_WRITE, MAP__S HARED, 
fd, addr) ; 

#ifdef VERBOSE 

fprintf (stderr, "Device mmap returned %x\n", (int)base); 

#endif 

} 

else /* if unable to open device */ 

{ 

fprintf (stderr, "Error opening device: %s %s %s %d", 

"device:", filename, "error - ", errno) ; 

*base - (char) -1; 

} 

return (base) ; 

} 


#ifdef BIT3 


/* 

/* 

/* 

/* 

/* 

/* 

/* 

f* 


************+*************++*+********************************** 

**************************************************************** 

The following functions are used to initialize the bit 3 
Sbus to VMEbus adaptor. 

**************************************************************** 

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★***********^********** - ************* 


*/ 

*/ 

*/ 

*/ 

*/ 

V 

V 
*/ 


/* *★*★★★★ ********************************************************* 
l* 

/* init_bit3 

/* mmaps the bit3 devices I/O Node registers, and initializes 

/* both the sbus and vme bit3 adapter cards. 

/* Returns true if the board initializes correctly, false if 

/* there are any errors. 

/* 

/★ ★*****★★★★★*********★**★*★★★***** ******************************* 
int init_bit3 () 

{ 

char *slot - "/dev/btsO"; 


*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 


/* Open the bit 3 device driver */ 

if ( (gBit3fd - open (slot, 0_RDWR) ) < 0) 

{ 

perror ("cannot open bit3 device"); 
exit (gBit3fd) ; 

} 

/* fix up the bit3 board io registers */ 

gNodelO - (struct bts_reg *) mmap (NULL, getpagesize {), 

PROT_WRITE | PROT_READ, MAP_S HARED, gBit3fd, BT_NODE) ; 
if (gNodelO — (struct bts_reg *)-l) 

{ 

perror ("could not mmap BT_NODE of bit 3 board"); 
exit (-1) ; 

} 

/* init the bit3 board. */ 
if (! setup (gNodelO)) 

fprintf (stderr, "\nCould not initialize Bit 3 SBus Adaptor . \n") ; 
exit (1); 

} 


return TRUE; 


) 



/* ***************************** *********************************** */ 
int setup (io__p) 

struct bts_reg *io_p; 

{ 

u char data; 


if (io_j3->loc_status & NO_POWER) 
{ 

bit3_check (io_p) ; 
return FALSE; 

} 

data - io_p->rem_cmd; 
io_p-> loc_cmd - CL£AR_ERR; 

1 o p— > r em_cmd - USE_P AGE ; 

io_p- > rem_pag e - 0; 
return (bit3_check (io_p) ) ; 

} 


/★ **************** 


* *************************** 


int bit3_check (io_p) 

struct bts_reg *io_p; 
{ 

int data; 


*/ 


data - io_p->loc_status; 

if (data & (ERROR_MASK | NO_POWER) ) 

{ 

printf ("Status error 0x%2.2x:\n", data); 
if (data & NO_POWER) 

{ 

printf ("\t Remote chassis off or cable disconnected. \n" ) ; 
} 

else 

{ 

if (data & ERR_PARITY) 

printf ("\tlnterface parity error. \n") ; 
if (data & ERR_BERR) 

printf ("\t Remote bus error. \n"); 
if (data & ERR_TIMEOUT) 

printf ("\tlnterface timeout. \n") ; 

} 

return (FALSE) ; 

} 

return (TRUE) ; 

} 


/★ ******************* **************************** ***************** */ 
char *map_bit3 () 

{ 

char *baseMemAddr - (char *) mmap ((char *)NULL, PAGE_SIZE f 
PROTORE AD j PROT_WRITE, MAP_S HARED, gBit3fd, BT_RRAM) ; 

if (baseMemAddr — (char *)-l) 

{ 

fprintf (stderr, "Failed to mmap memory . \n") ; 
exit (-1) ; 

} 

fifdef VERBOSE 

fprintf (stderr, "\tMemory mmap returned %x\n", ( int) baseMemAddr) ; 
#endif 

return (baseMemAddr) ; 

} 


#endif BIT3 


/* 

/* 

/* 

/* 

/* 


r ************** ******* 
******************************************************* 

IRAF interface commands */ 


*/ 

*/ 

*/ 

*/ 


IRAF interface commands 



/* These commands are used by the IRAF interface */ 

/* program detlocal.c */ 
/* */ 
/* They are not used in Quickview. V 
/* */ 
/* created 1/22/92 ped */ 
/* */ 
!* **★★★★★★****★★*★★★******★*★★*★**★★***★***★★******★***** */ 


/* ★*★**★*★***★**★★***★★★*******★★★**★*★*★*★★★***★*★*★★★** */ 


void ATD_iraf_de faults () ; 
void ATD_iraf_format () ; 
void ATD iraf initialize 0; 


void ATD iraf defaults () 


{ 

set_param ( 
extension */ 



CCDSER, 2048 

set^param ( 
V 

BINSER, 

1 

set_param ( 
*/ 

PRESER, 

0 

set_param { 
*/ 

UNDERSER, 

0 

set_param ( 
*1 

ORGSER, 

0 

set_param { 
*/ 

READSER, 2048 

set_param { 
read */ 

POSTSER, 

0 

set^param ( 
*/ 

OVERSER, 

0 

set_param ( 
*/ 

CCDPAR, 2048 

set_param ( 

V 

BINPAR, 

1 

set_param ( 
*/ 

ORGPAR, 

0 

set_param ( 
*/ 

READPAR, 2048 

set_j3aram ( 
read */ 

POSTPAR, 

0 

set_param ( 
post scan */ 

OVERPAR, 

0 

set_param ( 
*/ 

PARDELAY, 

100 

set_param ( 
fully */ 

ODELAY, 

20 

set_param ( 
fully */ 

CDELAY, 

20 

set par am ( 
*/ 

EXPL, 

200 

set_param { 

EXPH, 

0 

set_param ( 
*/ 

NUMC LEARS, 

1 

set_param ( 
*/ 

CISCFLAG, 

0 

set^param ( 
*/ 

ANTIBLOOM, 

0 

/* set_param ( 
backwards */ 

CAMO^SDIR, 

0 

/* set_param { 
backwards */ 

CAM0_PDIR, 

0 

/* set_param ( 
backwards */ 

CAM1_SDIR, 

0 

/* set_param ( 
backwards */ 

CAMl^PDIR, 

0 


} 


) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

) 

> 

) 


/* total length of serial register, including 
/* serial binning factor 

/* serial pre-prescan 

/* serial underscan 

/* serial read origin, should include extension 

/* serial read dimension 

/* serial postscan, pixels to discard after the 

/* serial overscan, pixels to read after overscan 
/* total length of parallel register 
/* parallel binning factor 
/* parallel read origin 
/* parallel read dimension 

/* parallel postscan, rows to discard after the 
/* parallel overscan, rows to read after the 
/* parallel clock delay time 
/* ODELAY is the delay for the shutter to open 
/* CDELAY is the delay for the shutter to close 
/* exposure time as a double word 

/* the number of clears to perform when clearing 

/* continuous clear flag 

/* clock recombination anti-blooming flag 

/* serial dir for CAMO 0 - forwards, 1 - 

/* parallel dir for CAMO 0 - forwards, 1 - 

/* serial dir for CAM1 0 - forwards, 1 - 

/* parallel dir for CAM1 0 - forwards, 1 - 


void ATD_i r a f __f ormat (ser_bin, ser_pre, ser_under, ser_org, ser_read, ser _post, 
ser_over, par_bin, par_org, par_read) 

long ser_bin, ser_pre, ser_under, ser_org; 

long ser_read, ser_post, ser_over; 

long par_bin, par_org, par_read; 

{ 


set_param 

set_param 

set^param 

set_param 

set^param 

set_param 

set^param 

set_j>aram 

set^param 

set_j>aram 


(BINSER, (unsigned 
(PRESER, (unsigned 
(UNDERSER, (unsigned 
(ORGSER, (unsigned 
(READSER, (unsigned 
(POSTSER, (unsigned 
(OVERSER, (unsigned 
(BINPAR, (unsigned 
(ORGPAR, (unsigned 
(READPAR, (unsigned 


short) 

ser_bin 

short) 

ser_pre 

short) 

se rounder 

short) 

ser_org 

short) 

ser_read 

short) 

serjoost 

short) 

ser_over 

short) 

par_bin 

short) 

par_org 

short) 

par_read 


set^param (OVERPAR, 0 ) ; 


void ATD_iraf_initialize () 

{ 

printf {stderr, "opening VMEbus device drivers. . An") ; 
ATD_init_devices ( ) ; 

#ifdef VERBOSE 

fprintf (stderr, "performing restart of camera controller . 

#endif 

reset () ; 

#ifdef VERBOSE 

fprintf (stderr, "initializing camera . .An"); 

#endif 

cam_restart () ; 

#ifdef VERBOSE 

fprintf (stderr, "setting all defaults ... \n"); 

#endif 

ATD_iraf_defaults () ; 
set_format () ; 

} 


static char *ATD_data_ptr; 

void ATD_init__data_j>tr () 

{ 

ATD_datajptr - (char *) ram_base; 

} 

char *ATD_get_data_ptr () 

{ 

return ( ATD_da t a_pt r ) ; 

} 


void ATD_set_dat a_pt r ( pt r ) 
char *ptr; 

{ 

ATD_data_ptr - ptr; 

} 


.An") 



ATDcam.h 


k ★***★★***********★★★★★*★★ **★★★★*★★*★★*****★*** *********/ 

V 

V 

V 
*/ 
*/ 
*/ 
*/ 

V 

V 

*/ 


Definitions for ATDcam.c 

History: Rev 1.0 4/3/92 

Extracted from cam.h for use in IRAF interface 

Copyright (c) 1992 Advanced Technologies Division of Photometries Ltd. 


*******★★★**★*★★***★★*★★*****★★**★*★★★★******★*************************/ 


/* functions */ 
void caminit (); 
void reset (); 
void halt (); 

void camjrestart () ; 
char io_read { ) ; 
void io_write () ; 
void io_pulse () ; 
void set_param () ; 
void ciscon (); 
void ci scoff (); 
void gain_lo(); 
void gain_hi 0 ; 
void offset (); 
void shade {) ; 
void oshut () ; 
void eshut (); 
void pix_bin{) ; 
void row_bin{); 
void pix_discard{) ; 
void row_discard() ; 
void pix__read ( ) ; 
void row_read(); 
void cam_write () ; 
void clear () ; 
void readout (); 
void bias () ; 
void xpose () ; 
void dark () ; 
void obs {) ; 

void pass_short_param () ; 
void pass_char_param (); 

void pass_s_char_param() ; 

void q_c am_c omman d ( ) ; 

void cam_command (); 
void issue_command (); 

void check_error () ; 
void set_crdy { ) ; 
void setjnsdfO; 

void wait_cmd_done (); 
void wait_smdf () ; 

void get_mbs { ) ; 

void fill_mbs(); 
void get_mbO () ; 

void tempo () ; 
void tempi () ; 
void get_format () ; 
void set_format () ; 
void anti_bloom_of f () ; 
void anti_bloom_on {) ; 
void integrate_ccd ( ) ; 
void cam_fast () ; 
void cam_slow(); 

void wait_empty ( ) ; 
void wait_0K() ; 
void wait CR LF 0 ; 


void set exposure time(); 


char get_a_char () ; 
void send_file(); 

void flushjouffer () ; 
void read_cam_buffer() ; 

j ★★**********★★***★★*★★*★** *★*•*•*★★*★★*★*★ j 

/* The 68HC11 controller command set. */ 
/★★★★******★★★*★★**★*★★★*★★ *★★★******★★★★ / 
/* VME board commands */ 


tdefine 

CMD 

AG INIT 

0x0000 

/* 

*/ 

tdefine 

CMD' 

'SPCON INIT 

0x0001 

/* 

*/ 

#define 

CMD' 

"SPCON_RESET 

0x0002 

/* 

*/ 

#def ine 

CMD 

IORD 

0x0003 

/* 

*/ 

#def ine 

CMD* 

"iOWR 

0x0004 

/* 

*/ 

#def ine 

CMD" 

"IOPLS 

0x0005 

/* 

*/ 

#def ine 

CMD 

HALT 

0x0006 

/* 

*/ 

#define 

CMD' 

'ERROR RESET 

0x0007 

/* 

*/ 

tdefine 

CMD' 

"FLUSH BUFFER 

0x0008 

/* 

V 


/*★★*•★**★*********★*★*★★*★★★*★★ *★★★*★**** f 

/* Camera commands */ 


#define 

CMD 

CAM RESTART 

0x0020 

/* 

*/ 

#define 

CMD - 

"SET PARAM 

0x0021 

/* 

*/ 

#define 

CMD" 

’CISCON 

0x0022 

/* 

*/ 

#define 

CMD" 

"CISCOFF 

0x0023 

/* 

*/ 

#define 

CMD' 

'GAIN HI 

0x0024 

/* 

*/ 

#define 

CMD" 

"GAIN LO 

0x0025 

/* 

*/ 

#define 

CMD" 

"OFFSET 

0x0026 

/* 

*/ 

#def ine 

CMD" 

SHADE 

0x0027 

/* 

*/ 

tdefine 

CMD" 

"OSHUT 

0x0028 

/* 

*/ 

tdefine 

CMD" 

"CSHUT 

0x0029 

/* 

*/ 

tdefine 

CMD" 

"PIX BIN 

0x002A 

/* 

*/ 

tdefine 

CMD" 

"ROW BIN 

0x002B 

/* 

*/ 

tdefine 

CMD" 

"PIX DISCARD 

0x002C 

/* 

*/ 

tdefine 

CMD" 

'ROW DISCARD 

0x002D 

/* 

*/ 

tdefine 

CMD' 

"PIX READ 

0xQ02E 

/* 

*/ 

tdefine 

CMD" 

"ROW READ 

0x002F 

/* 

*/ 

tdefine 

CMD' 

"CAM WRITE 

0x0030 

/* 

*/ 

tdefine 

CMD" 

"CLEAR 

0x0031 

/* 

*/ 

tdefine 

CMD" 

"READ 

0x0032 

/* 

*/ 

tdefine 

CMD" 

"BIAS 

0x0033 

/* 

*/ 

tdefine 

CMD" 

"XPOSE 

0x0034 

/* 

*/ 

tdefine 

CMD' 

"DARK 

0x0035 

/* 

*/ 

tdefine 

CMD" 

"OBS 

0x0036 

/* 

*/ 

tdefine 

CMD" 

"SEND STRING 

0x0037 

/* 

V 

tdefine 

CMD" 

"TEMPO 

0x0038 

/* 

V 

tdefine 

CMD" 

"TEMPI 

0x0039 

/* 

*/ 

tdefine 

CMD" 

FORMAT 

0x0 03A 

/* 

*/ 

tdefine 

CMD" 

"SET FORMAT 

0x0 03B 

/* 

*/ 

tdefine 

CMD" 

"ANTI BLOOM OFF 

0xQ03C 

/* 

V 

tdefine 

CMD" 

"ANTI BLOOM ON 

0x00 3D 

/* 

*/ 

tdefine 

CMD" 

"INTEGRATE CCD 

0x0 03E 

/* 

*/ 

tdefine 

CMD" 

"CAM FAST 

0x003F 

/* 

*/ 

tdefine 

CMD" 

"CAM_SLOW 

0x0040 

/* 

*/ 

tdefine 

CMD 

CAM ENABLE 

0x0041 



tdefine 

CMD" 

'CAM DISABLE 

0x0042 



tdefine 

CMD" 

"SET TEMP 

0x0043 



tdefine 

CMD" 

"FRAME TRANSFER 

0x0044 



tdefine 

CMD" 

"FULL FRAME 

0x0045 




/**★*•** **★*******★★★*•*★*★****•**■*★* **★***★★★/ 
/* Constants */ 

#def ine CMD_STOP OxOOFF /* */ 

#def ine CMD RESET OxOOAA /* */ 


/* parameter offsets as far as the camera is concerned */ 


tdefine 

CCDSER 

0 

/* 

length 

of serial register, incl. extension 

*/ 

tdefine 

BINSER 

1 

/* 

serial 

binning factor 

*/ 

tdefine 

PRESER 

2 

/* 

serial 

prescan 

*/ 

tdefine 

UNDERSER 

3 

/* 

serial 

underscan 

*/ 

tdefine 

ORGSER 

4 

/* 

serial 

read origin 

*/ 

tdefine 

READSER 

5 

/* 

serial 

read dimension 

V 



#define 

POSTSER 

6 

/* 

serial postscan 

V 


fdef ine 

OVERSER 

7 

/* 

serial overscan 

V 


#def ine 

CCDPAR 

8 

/* 

length of parallel register 

V 


tdefine 

BINPAR 

9 

/* 

parallel binning factor 

*/ 


#def ine 

ORGPAR 

10 

/* 

parallel read origin 

*/ 


#def ine 

READPAR 

11 

/* 

parallel read dimension 

*/ 


#def ine 

POSTPAR 

12 

/* 

parallel postscan 

*/ 


#define 

OVERPAR 

13 

/* 

parallel overscan 

*/ 


#def ine 

PARDELAY 

14 

/* 

parallel clock delay time 

*/ 


/* parameter locations 

15 through 19 unused for now 

*/ 


#define 

ODELAY 

20 

/* 

shutter open delay [m] 

*/ 


tdefine 

CDELAY 

21 

/* 

shutter close delay [ms] */ 



tdefine 

EXPL 

22 

/* 

exposure time 

*/ 


#def ine 

EXPH 

23 





#define 

NUMC LEARS 

24 

/* 

number of clears to execute 

*/ 


tdefine 

NUMIMAGES 

25 

/* 

number of images to acquire 

*/ 


#define 

IM WAIT LO 

26 

/* 

delay between image acquisitions 

*/ 


#define 

IM WAIT HI 

27 





/* parameter locations 

28 through 29 unused for now 


*/ 

#define 

CISCFLAG 


30 

/* continuous clear flag 


*/ 

tdefine 

ANTIBLOOM 


31 

/* clock recombination anti-blooming flag 

*/ 

tdefine 

ARCH 


32 

/* ccd architecture 







0 * full frame, 1 - frame transfer 

*/ 

tdefine 

SPEED 


33- 

/* camera readout speed 0 - slow, 1 

- fast 

*/ 

tdefine 

SLDEL1 


34 

/* slow readout delay 1 







from shift to summing well 

*/ 

tdefine 

SLDEL2 


35 

/* slow readout delay 2 







from summing well to adc 

start pulse */ 

tdefine 

CAMDAC_DEF AOLT 

36 

/* default value for offset dac 


V 

/* parameter locations 

37 through 39 unused for now 


*/ 

tdefine 

GSPFLAG 


40 

/* graphics system processor flag 


*/ 

tdefine 

GSP CAP WIN 


41 

/* gsp capture window 


*/ 

tdefine 

GSP CAP X 


42 

/* gsp capture window x location 


*/ 

tdefine 

GSP CAP Y 


43 

/* gsp capture window y location 


*/ 

tdefine 

GSP DIS WIN 


44 

/* gsp display window 


*/ 


/* parameter locations 45 through 49 unused for now 


/* 


the following parameters are used to set the shift directions on a AIS or 
AIS2 camera system. 0 - forwards, 1 - backwards. */ 


tdefine 

CAM0 

SDIR 

50 

/* 

serial direction for CAM0 

*/ 

tdefine 

CAM0" 

"PDIR 

51 

/* 

parallel direction for CAM0 

*/ 

tdefine 

CAMl" 

'SDIR 

52 

/* 

serial direction for CAM1 

*/ 

tdefine 

CAMl" 

PDIR 

53 

/* 

parallel direction for CAM1 

*/ 


/* Offsets into the PTVSI mailbox registers */ 


tdefine 

MB0 

1 


tdefine 

MB1 

3 


tdefine 

MB2 

5 


tdefine 

MB3 

7 


tdefine 

MB4 

9 


tdefine 

MB5 

11 


tdefine 

MB6 

13 


tdefine 

MB7 

15 


tdefine 

MB8 

17 


tdefine 

MB9 

19 


tdefine 

MB10 


21 

tdefine 

MB11 


23 

tdefine 

MB12 


25 

tdefine 

MB13 


27 

tdefine 

MB14 


29 

tdefine 

MB15 

31 


/* Offset to the PTVSI reaset location */ 

#def ine RESET 0x3D; 

/★ Bit masks used for interpreting the status mailbox (mailbox 0) */ 


tdefine CRDY 
tdefine MSDF 
#define BSY 


0x01 

0x02 

0x04 



/* Bit masks for interpreting mailbox 6 */ 

#define SMDR OxOX 



Appendix E: 


UNIX Utility Source Code 



/* AlSsay - a sirrple program used to send any old text string to the AIS cameras 
through the serial port on the VME interface. May also be used with 
ATC5 or ATC6 cameras. */ 

#include <stdio.h> 

main ( argc , argv ) 
int argc; 
char *argv[] ; 

{ 

if (argc != 2) 

{ 

f print f ( stderr , “ \nUsage : AlSsay string\n"); 
exit ( ) ; 

} 

ATD_init_devices ( ) ; 
send_str ing ( argv [ 1 ] ) ; 
wait_OK ( ) ; 
wait_CR_LF ( ) ; 

} 



/* AlSsend - a sirtple program used to send any old text file to the AIS cameras 
through the serial port on the VME interface. May also be used with 
ATC5 or ATC6 cameras. */ 


#include <stdio.h> 


main ( argc , argv ) 
int argc; 
char *argv[] ; 

{ 

if (argc != 2) 

fprintf ( stderr , " \nUsage : AlSsend f ilename\n" ) ; 
exit ( ) ; 

} 

ATD_init_devices ( ) ; 
send_file (argv[l] ) ; 


} 


/* AlSsetup - used to initialize some of the more advanced 
fetures of the AIS camera system, including the 
programmable clock voltages and the programmable timing 
states. Meant for use by the system maintenance person 
more than for the casual user. 

*/ 

♦include <stdio.h> 
void ask_default ( ) ; 


main ( ) 

{ 

unsigned int selection; 
int done=0; 

ATD_init_devices ( ) ; 


while ( !done) 


{ 


"\n\n" ) ; 

" AIS setup procedure \n\n“ ) ; 

" Please select one of the following operations\n\n“ 


print f ( 
printf ( 
print f ( 
printf ( “ 0 . 

printf (" 1. 

printf ( 11 2 . 

printf (" 3. 

printf (" 4. 

printf ( "\n\nplease enter your selection. 


reset and initialize camera\n“); 
initialize clock voltages\n“ ) ; 
initialize timing information\n“ 
initialize parameters\n“ ) ; 
exit this programXn" ) ; 

) ; 


scanf ( "%u" , kselection) ; 


if ( (selection < 0) 
printf ( “ERROR: 


| | (selection > 4) ) 
invalid selection. \n" ) ; 


if (selection == 0) 

reset () ; /* reset the VMEbus interface */ 

cam_restart ( ) ; /* re-initialize the camera */ 

} 


if (selection == 1) 

{ 

send_f ile ( “AlSvolts" ) ; 
ask_def ault ( ) ; 

} 


if (selection == 2) 

{ 

send_f ile ( “AlStiming" ) ; 
ask_def ault ( ) ; 

} 


if (selection == 3) 

printf ( “\nSorry ... function not yet supported. \n“ ) ; 

if (selection == 4) 
done = 1; 

} 

exit ( 0 ) ; 

} 


